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- Note to parents 


This book is aimed at the young, first-time 
user or the not-so-young perplexed beginner! 
An introduction to the simple programming 
commands is covered in the first section of the 
book, while the second section concentrates 
on some of the graphics commands available 
on the Amstrad. 


Many of the more advanced BASIC 
commands found in the language of the 
Amstrad have not been introduced, the 
concept of the book precludes all but the 
easiest of programming ideas. Through 
reading the book, young computer users will 
develop a sound base on which their new- 
found skills can be built. Many more complex 
books exist, but very few offer such an easy, 
step-by-step introduction for young people. 


A few comments concerning the machin 
may be helpful, as many first-time users knee 
little about the machine they have invested in 


The Amstrad is perhaps the most 
sophisticated computer in its price range. The 
language used is the powerful LOCOMOTIvg 
BASIC, an extension of the well known BASIC 
(Beginners’ All Purpose Symbolic Instruction 
Code) computer language, which, despite its 
name, is now used by a very large number of 
professional programmers. 


The Amstrad’s graphics capabilities, that 
is, the ability to draw and colour areas of the 
screen, are very impressive for a machine in 
its price range. 


= Introduction 


You are growing up into a world that is 
changing very quickly. Not so long ago, having 
a home computer would have been very rare. 
Today millions of people own home 
computers. 


This book is to help you learn to use the 
Amstrad computer. With the Amstrad you can 
draw pictures, play games, make music, do 
sums or (with additional equipment) even 
control robots! But before you try to write 
complicated programs, you must learn how to 
use some of the easy commands. 


Work through this book carefully. Try to 
experiment with your Amstrad. You will learn 


a lot by making small changes to programs. 
Remember that you are in control — the 
computer is just a willing slave! All you have 
to do is give it the correct instructions ... 


Important 

To avoid confusion between certain BASIC 
words and normal words, the BASIC language 
words are usually printed in CAPITAL 
LETTERS. If you come across a word printed 
inside odd-looking brackets like this 


<ENTER> 


it means press the key with the word enter 
printed on it. 
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- Getting started 


There are three parts which make up the 
Amstrad computer system: the computer 
itself, a video monitor and a cassette recorder. 


You will be able to add on other parts, 
such as joysticks or a printer or a floppy disk 


when the special connectors become available. 


Each part of the system has a special job to do, 
so let’s have a look at what each part does. 


The computer 

The computer is the heart of the system. Inside 
it is a very complicated electrical circuit using 
microprocessors — which you know as ‘chips’. 
These ‘micro-chips’ use electrical signals to 
make the computer very fast at working out 
problems that might take you or me several 
days. 


Never take the computer or its power 
supply apart; you may damage yourself and 
the computer. The power supply uses mains 
electricity which can be dangerous, so if 
anything goes wrong with your Amstrad, you 
must get an expert to fix it. 


On its own, the computer cannot display 
pictures or words for you. A second part to the 
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system is a video monitor. 


The Amstrad will work with either qa 
colour monitor or an ordinary green tube 
monitor, but obviously, you won’t see the 
colours on a green tube monitor. 


Large and small letters 

Now try pressing some of the keys. To get the 
Amstrad to print capital letters on your TV 
screen, hold down either of the keys marked 


SHIFT 
while you press the key marked 

CAPS LOCK 
at the left of the second row of keys. This is 
called the CAPS LOCK key because it ‘locks’ 


the keyboard into all-capitals mode. 


To test this, try typing something along 
these lines: 


JOHN BLOGGS is my name 


If you make a mistake when typing, press 


the DELETE key marked 
DEL 


which is in the top right-hand corner of the 
keyboard. This removes (‘rubs out’) the 
character immediately on the left of the 
cursor. 


When the CAPS LOCK is off the 
computer acts like a normal typewriter — 
everything appears in small letters, unless you 
hold down the SHIFT key. 


Special keys 
Now press the key marked 


ENTER 


This is on the right of the keyboard, third 
row down. The computer will probably reply 


Syntax error 
Ready 
& 


Don’t worry — this is just the Amstrad’s way of 
telling you that it doesn’t recognise what you 
have typed as a proper BASIC instruction. 


Underneath the word ‘Syntax error’ you 
should see a READY message. This is called 
the BASIC prompt or just prompt for short. 
Beneath it is a square which is called the 
cursor. 


The prompt tells you that the Amstrad has 
finished what it was doing and is ready for 
another instruction. The cursor tells you where 
the next character (letter, symbol or number) 
will be printed on the screen. 


Symbols 
Take a look at the keyboard. You may notice 
that some keys have two symbols printed on 
them. To get the top symbol you have to hold 
down the 


SHIFT 


key as you press the key for the symbol you 
want. See if you can make the Amstrad print 
some of the following symbols on the screen. 


(lk ESK&")< a 497 


Auto-repeat 
What happens db you keep a letter on number 
hey progse|ed for more than a couple of 


socom! 


What bappeos al you hold dawsn the key 


mrarkead P)bb.? 


his auto repeat effect can be very useful 


Remember 


1. Nevereator drink near the Aimstrad, 
Crumbs and spill milk can ruin it. 


2, Never open the Amstrad. Curiousity 


kills computers! 


3. When the green CAPS LOCK key is 
pressed on, you gel capital letters. 


~When the green CAPS LOCK is off, you 
get small letters when you press a letter 
key. This is the normal typewriter 
mode. Use SHIFT to get occasional 


capilal letlers. 


. The DELETE key rubs out the character 
on the left of the flashing cursor. 


If you keep any key depressed for more 
than a second or two, it will start to 
aulo-repeal. 


when you want totype a whole rays of 
TOS} Jeane 

Os symbols GUCh a a rovs of aye hesrjsslen ( Wes, 

anes 4 (* 


IO 


stars, or when you want to rubeout + 


GI. 


words or sentences 


bnough of this messing about! Yrs 
probably want to get your computer do 
something, So lets move on to try do Za Ms 
ideas. : aay 


7. The ENTER key tells the computer that 
you have finished typing and want it t, 
do something. If you have given ita. ins 
proper BASIC command it will carr 
out your instruction. If not, it will tel] 
you that you have made a mistake by 
printing Syntax error. 


. When your instruction has been 
carried out, the BASIC prompt READY 
and cursor will re-appear. 


. The prompt tells you that the computer 
is waiting for another INSTRUCTION 
or COMMAND. 


10. The cursor line tells you where the 
next character will be printed on the 
screen. 


11. To obtain the symbols printed at the 
top of a key, hold down SHIFT while 
you press the required key. 


aah 


ti... Cha 
Te pter 1 


Words and numbers 


Computers are able to work out sums 
very quickly. But unlike pocket calculators, 
they can also print messages on the screen of 
video monitor, and have very large memories. 


To make your Amstrad do something, you 
have to tell it what to do, using a special 
language called BASIC. 


BASIC is a very easy language to learn. 
Whereas you already know thousands of 
English words, your computer only 
understands around a hundred very simple 
words like PRINT, LIST, END, and a few 
specially made up commands like CLS — 
which is short for CLear the Screen. 


Let’s try using some BASIC commands. 
Commands may be keyed in capital or small 


letters. Your Amstrad will convert all 
commands entered into capital letters. 


Type: 
CLS 


After typing a command, you must always 


press the key marked 
ENTER 


to tell the computer that you want it to obey 
your command. So after typing CLS and 
pressing the ENTER key, the screen should 
clear. The prompt (READY) and the cursor 
should then appear at the top of the screen. 


If you make a mistake when typing, use 
the DELETE key — one press rubs out the last 
letter typed, provided you haven’t yet pressed 
<ENTER>. 


Number crunching! 
Now you can try using the command 


PRINT 


to make the computer PRINT some messages 
on the screen. We shall start with some sums, 
to see how quickly the Amstrad can work 
them out. Computer people call this ‘number 
crunching’. Try typing something like this 


PRINT 5678+7890 <ENTER> 


Remember you can use capital or small 
letters for the word PRINT. Press the ENTER 


key to make the computer work out the 
answer. The screen should now look like this: 


PRINT 5678+78990 
13568 

Ready 

G 


You now know how to use the computer 
like a calculator! The main difference is that 
the word PRINT has to be used to tell the 
computer to PRINT the answer. 


Now try the following sums, which use 
addition and subtraction. The subtraction sign 
(or minus sign) is next to the zero (0). Unlike 
the addition sign, you don’t have to press 
SHIFT to get the minus sign. Don’t forget to 
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press the ENTER key after each sum ie 
the answer. Set 


PRINT 3567-987 ae 
PRINT 4567+89765 - ENTeR> 
PRINT 34535-568+45678 ER. 
< EN 
PRINT 5678+3456-567._— ENTE 


If you want to multiply or divide, you 
have to use some strange signs. 


Multiplication 

To multiply, we use the * (star) sign, insteag of 
an x. This is because the computer might 
confuse the normal ‘times’ sign with the lette, 
x. So you enter the sum 4 x 3 into the compute, 


as 
PRINT 4*3 
then press <ENTER> to get the answer, 


The * key is near to the ENTER key. 
Notice that there are two symbols printed on 
this key —a star (*) at the top and a colon (:} 
below. Because the star is printed at the top, 
you will need to hold down the SHIFT key to 
get the star sign. 


Just for fun, try this one, which stretches 
your Amstrad to the limit of its accuracy: 


PRINT 11111.111 * 11111.1111 


Be careful to put five ones in front of the 
decimal point and three after it the first time. 


Note that the second number has five ones in 
front of the decimal point and four after it. 


Division 

To divide, we use the / (slash) sign, which is 
printed below the ? (question mark — or 
‘query’) on the bottom row of keys. As the 
slash sign is printed at the bottom of the key, 
you don’t need to press <SHIFT> this time. 


So 20 divided by 5 would be typed in as 


PRINT 20/5 <ENTER> 


Try some more sums using * and /. Make 
them as difficult for the computer as you can 
by using really big numbers. Don’t forget to 
press < ENTER > to get the answer. The 
computer will then let you know that it is 
ready for the next job by displaying the 
READY prompt and the cursor square. 


Too big! 
If the answer becomes too big for even the 


Amstrad to cope with, you'll find that it gives 
you some strange looking answers, like this 


9.87654321E+8 


The E+8 at the end of the number means ‘move 


the decimal point EIGHT places to the 
RIGHT”. If it read 


9.87654321E-6 


the E-6 would mean ‘move the decimal point 
SIX places to the LEFT’. This is called 


exponential notation. Don’t worry if you can’t 
understand it —it isn’t really important! 


Making mistakes! 

Take your time typing and don’t worry if you 
make mistakes — the computer won't be 
harmed. Unlike most parents and 
schoolteachers, the computer has infinite 
patience. It won’t get angry, or call youa 
‘steaming twit’! All it does is print out the 
message 


Syntax error 


on the screen. For the moment, just type the 
command again and all should be well. 


If you spot a mistake before you press the 
ENTER key, you can use the DELETE key to 
rub out the error. 


Words and sentences 

You can also print words and sentences on the 
screen. The difference is that words have to be 
placed between quotation marks, just like 
when you use speech marks (or ‘quote marks’) 
in your English lessons at school. The “ (quote) 
mark is on the 2 key. You will have to use 
SHIFT to make it appear. Try the following. 


CLS <ENTER> 
PRINT “All pigs have wings” 


What do you have to press to make the 
computer obey your instruction? 


The computer will print any message that 
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e marks. Even if you 
ke, the computer will 


print it exactly as you asked it to. 


you put between quot 
make a spelling mista 


You can also PRINT numbers inside 
quote marks, but they cannot be used to do 
sums like the numbers you typed at the 
beginning of this chapter. 


Because the computer prints anything in 
quote marks, you can make it appear foolish! 
Try this 


PRINT “2+2=5” 


If you want some more practice finding 
your way round the keyboard, try getting your 
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Amstrad to print some really stu; 
like , a things 


PRINT “Elephants are fish 
with curly hair and 
gossamer wings” 


Remember 


. You may use capital or smal] letters 
when typing a COMMAND. Vou. 

Amstrad will convert the command 

capital letters. a 


. Use the CLS command to CLear the 
Screen. 


3. After giving the Amstrad a command 
you must press the ENTER key to mak 
it carry out your instruction. ° 


. The PRINT command can be used to 
print numbers, symbols, words or 
sentences. 


. To PRINT words or sentences, they 
must be enclosed in double quotation 
marks (*‘). 


. To do simple arithmetic, use the 4, -,* 
and / signs. 


. The computer cannot spell. Words or 
sentences to be printed must be typed 
in carefully. 


JON 


. Vann 7- S 


ne i 
7 ® 
{ t 


Chapter 2 


_ Starting to program! 


You may not realise it, but computers 
have simply dreadful memories. The moment 
you turn them off, they forget everything you 
have told them. 


Unlike you and I, computers don’t ever 
really learn anything. Each time you want 
your computer to do something, you have to 
tell it precisely what to do, and what order to 


do it in. 


So far, you have been making the 
Amstrad do one thing at a time, by giving it 
direct commands, like 


PRINT3*4 <ENTER> 
to which it gives an immediate answer. 


To make your Amstrad do more 
interesting and complicated things, you have 
to give it a list of things to do. This list is called 
a program — using the American spelling, with 
only one ‘m’. 


A program is simply a list of commands, 
like ‘clear everything off the screen’, ‘print my 
name’, ‘now print something else’. 


Unfortunately, while you probably know 
and use several thousand words of English in 
everyday life, your Amstrad only knows about 
154 BASIC keywords. (Even this is about 
double the number of words that many home 
computers understand). 
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So you have to learn to write your 
programs using words that the Amstrad can 
understand. And you make sure that the 
computer follows the instructions in the right 
order by giving a number to each program 


line, like this: 


1@CLS 
20 PRINT “BRIAN” 
30 PRINT “is a clever lad” 


40 END 


You could number the instructions (or program 
lines): 1, 2, 3, 4, 5 etc, but it’s usually better to 
go up in steps of ten, like this: 10, 20, 30, 40, 50. 


There is a good reason for this. If you 
want to place additional instructions between 
program lines, it is easy if the numbers are ten 


units apart. 

For example, if you wanted to add your 
surname to the above program, you could add 
it anywhere between lines 20 and 30. Let’s 
choose the half-way mark: 


25 PRINT “SMITH” 

the program now becomes: 
10CLS 
20 PRINT “BRIAN” 
25 PRINT “SMITH” 
390 PRINT “‘is a clever lad” 
49 END 


If you had numbered your program lines 1, 2, 
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3, instead of 10, 20, 30 there woul 
no room to squeeze extra lines as 
et 


Veoh 
! &g 
them! en n 


We 
RUNning a NEW program 

Before you type in your first progr 

sure that there are no old instruction”. Ake 
computer’s memory by typing base 


NEW <ENTER> 


The command NEW tells the comput 

clear any old program from its ea to 
get ready for a fresh program. If you nt and 
do this you can sometimes run into hone! 
problems when old program lines jane 
interfering with a new program! 


Now type the following two progra 
lines. Try not to change anything. If ae 
a mistake, use the Make 


DELete 
key to rub out the mistake and retype, 


At the end of each program line, check 
that you have typed it in correctly, then pregs 


ENTER 


If you find you have made a mistake after 
pressing the ENTER key, type the whole 
line in again. 


10 PRINT “HELLO ne 
20 GOTO 10 


Ok, youve typed the program in correctly 
bul absolutely nothing has happened! 


To make the computer carry oul the 
program, you need to type a special BASIC 
command, Type the word: 


RUN 


then press the ENTER key. The computer 
should immediately carry out the program 
instructions and screen full of ‘HELLOs’ 
should appear! 


How to stop it! 

\Vhen everything is correctly typed in, and 
after typing RUN and pressing <ENTER>, 
you should see lots of words go whizzing up. 


To stop the program press the red 
ESCAPE key marked 


<ESC> 


This tells the computer that you want it to stop 
carrying out the program temporarily. 


Now you should be able to read the words 
on the screen! 


After it has printed enough words to fill 
the screen, the Amstrad automatically moves 
the words up the screen so it can print more 
down below; this is called SCROLLing. It can 
be a nuisance at times. 


Now RUN the program again, but this time, 


instead of typing the word RUN, press any 
key. 


Remember, you can completely stop the 
program al any time by pressing twice the key 
marked 


ESC 


Bug hunting! 

Programs seldom work perfectly the first time 
you try to RUN them. Usually the problem is a 
tiny typing error, which in a long program can 
take ages to find. Finding and correcting 
typing errors and program mistakes is called 
‘de-bugging’. 


The Amstrad helps you find some (but by 
no means all) errors by printing certain error 
messages on the screen, such as 


Syntax error in 1@ 


If the computer has told you that you have 
made a mistake, then you must check the 
following points: 


1. Have you typed the letter (O) when you 
should have typed zero (0)? It is absolutely 
essential to use the Zero key (the 0 witha 
slash through it) when you want number zero 
(or nought). Only use the O key (without the 
slash) when you want the letter ‘O’. 


2. Have you made a spelling mistake? Check 
that you have spelled PRINT and GOTO 
correctly — using letter ‘O’ this time, not zero! 
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3. Have you used the double quote mark 


<‘“~s at both ends of the word to be 


printed?. 


4. Did you put the semi-colon <;> in the right 


place (at the end of line 10)? 


5. Did you leave a space after the word 
HELLO, but before the second set of quote 


marks? 


How it works 
You know what the PRINT command does, so 


line 10 is easy to understand. It tells the 
computer to PRINT the word inside the quote 


marks — HELLO. 


After carrying out the instruction in line 
10, the computer moves on to the next biggest 
program line number — line 20. This tells it to 
GOTO another place in the program. 


In this program, the GOTO line sends the 
computer back to line 10 where (surprise! 
surprise!) it finds the instruction to PRINT the 
word ‘HELLO’ again. Then it goes on to line 20 
which sends it back to print the word again. It 
will carry on doing this (as fast as the micro- 
chips will let it) for ever and a day — unless 
you press ESCAPE or turn the power off! 


Making changes 
You can make several changes to this program. 


It is worth making changes because you can 
learn a lot by altering programs. 


Before changing a program, you need to 
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see the LISTing on the scre 


tte en.S 
following commands: 1. So lype 


the 


CLS - ENTER. 
LIST - ENTER. 


The LIST of program lines sho 
on the screen. 


uld no 
ADD, 
1. Change line 20, by typing: 
20 GOTO 20 <ENTER~ 


Now type LIST again to see 

t 
has changed. You should still be mle ling 
old program on the screen (a CLS fir O See the 
would have got rid of it). St of al] 


Before you RUN the revised Program 


what do you think will hap ? : 
pen? T 
RUN, then ENTER to make the a eek 


work. 


Now press ESCAPE twic 
line 20 back to — change 


20 GOTO 19 <ENTER~> 

Here's another change you can try: 
2. Change line 10 to— 

10 PRINT “HELLO 


Can you spot the difference? Find out 
what happens when there is no semi-colon at 
the end of line 10. 


if you place a semi-colon <;> after a word 
that is to be PRINTed, the computer will print 
the next word immediately afterwards — on 
the same line if there is room. But if you leave 
the semi-colon out, each item will be printed 
on a separate line. 


Patterns 
You can make some interesting patterns on the 
screen using the PRINT and GOTO 


commands. 


In the next program, Line 10 uses CLS to 
clear the screen; then line 20 instructs the 
computer to print a line of stars and dots, 
instead of the word “HELLO”. 


Line 30 is a special line that tells the 
computer to check if it has filled the screen. If 
so, the program should end. We shall look at 
the commands IF and THEN later in the book. 


To get rid of any old program, type: 
NEW <ENTER> 


before starting to type these new program 
lines: 


1@ CLS 

ZO PRIN ***** 

30 IF V=23 THEN END 
40 V=V+1:GOTO 20 


Now RUN the program. Remember to 
press ENTER. 


This time, the computer should end its 
lask ready for further action! Can you see the 
prompt cursor (Ml) at the bottom of the screen? 
If you want to clear the screen and get back to 
the program listing, type the following 
commands; 


CLS -ENTER~- 
LIST ~ ENTER 


Try changing line 20. Make the computer 
print different patterns by using a different 
number of stars or dots. You might try using 
words instead of symbols. 


Remember 


1. A program is a list of instructions, 
written in a way that your computer 
can understand. 
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2. Every line ina BASIC program must 
start with a line number. Line numbers 


usually go up in steps of ten, to leave 
room for additional lines to be 


inserted. 


3. Type NEW before you enter a new 


program. This clears any old program 
lines from the computer's memory. 


4. Press ENTER after typing each 


program line. This tells the computer 
that you have finished the line. 


5. Be careful always to use the correct 


slashed ZERO key (0) for number zero 
(or nought) and O (without the slash) 
when you want letter ‘O’. This is a very 


common cause of programs not 
working. 


6. To start a program, type RUN, then 
press the ENTER key. 


7. The command GOTO makes the 
computer continue with the program 
line number which follows the GOTO 


command. 


. You can usually stop g ' 
pressing the ESCape be rogram } 
can continue with the *Y O 


8 ¢ 


. The command LIST makes the 


computer print out th 
screen. © Program on the 


. Placing a semi-colon (;) after ae 
ord 


that is to be PRINTed, makes t 
computer print the next word he 
immediately afterwards, usual] 

the same line. (The semi-colon Yon 
follow directly after the fering: 
quote marks. If you place it bates of 
quote marks, it will be PRINTed ¢ the 
screen.) ON the 


. If there is no semi-colon (;) or ee 
, a 


(,) after the second set of 

quote 
the next item to be PRINTed ae 
appear on a fresh line. 


Chapter 3 


Inside your Amstrad is a group of micro- 
s which can store electronic signals 
representing numbers and words. We call 
shone chips its Random Access Memory — or 
RAM for short. 


chip 


The best way to understand the Amstrad’s 
random access memory is to think of it as 
thousands of empty boxes. You can fill any of 
these boxes with numbers, letters, symbols, 
words or sentences — in fact anything that you 
want the Amstrad to remember. 


Before you can put something into a 
memory box, you have to ‘write a label’ for the 
box — otherwise the Amstrad won't know 
which of its thousands and thousands of boxes 
to put it in — and you won't know where to 


find it! 

The memory box label can be almost any 
letter, or a descriptive word. lor example, if 
you wanted the Amstrad to remember that 
you have 14 model cars you can type: 


LET cars=14 < ENTER> 


Try typing this, using capital letters for the 


Making Amstrad remember! 


command LET and small letters for cars. 


Note that there are no quote marks round 
the word cars. This is because you are using 
the word asa label fora memory box, and not 
as something you want PRINTing. 


Now type: 
PRINT cars <ENTER> 


Like magic. the Amstrad responds with the 
answer: 


14 


What happened is this. First you stored 
the number 14 in a memory box labelled ‘cars’, 
Then, when you asked the Amstrad to PRINT 
cars (without quote marks), it looked in the 
memory box labelled ‘cars’, found the number 
14 inside and copied it onto the screen. 


What would happen if you were to 
enclose the word “cars” in quotation marks? 
Try it and see: 


PRINT “cars” 
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ENTER we wont 


(Don't forget to press 


be reminding you any more!) 


Now try it again, without the quote marks 


PRINT cars 


Let's put something into another memory 


box. Suppose you want the « omputer to 
remember that you have 5 model trains. Just 
type 

LET trains=5 


Now vou have put the number 5 into a 


memory box labelled trains. To check that it is 
there, clear the screen with 

CLS 
then type: 


PRINT trains 


Did you get the answer 5? If not, you must 
have typed it in wrongly, so type it in again. 


If you want to know how many toys you 
have altogether, you can get the computer to 
count them up for you. Type: 


LET models = cars + trains 


This formula line may seem a bit strange if you 
haven't done any algebra. 


What it means to the computer is ‘look in 
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the memory box labelled cars, then ad 
number you find there to the number © the 
in the memory box labelled trains. Buea fing 
result into a new memory box labelled the 
models’. 


What number will it find in the mem 
box marked ‘cars’? And what number nar 
find in ‘trains’? u 


So what number would you expect it} 
put in the box labelled ‘models’? 7 


To find out if you were right, type 
PRINT models 
Don't worry if you got it wrong the first time. 
Numeric variables as these numbers and labels 
are called, confuse most people to start with, 


but you will soon get used to using them. 


Note that to save typing, you can leave out 


the % 


of typins 
LET trains = 5 
you can type simply: 
trains =59 


to get the same result with less effort! 


Mindbender 3.1 

To test whether you really understand 
what is happening, imagine that you have 
added three model planes to your 
collection. How would you get the 
computer to tell you how many models 
you have altogether? Try to work it out for 
yourself before looking at the answer at 
the back of the book. 


HINT: planes =? 
models =? 


Mindbender 3.2 
Now try this one. Let’s pretend your 

| record collection contains 12 singles and 8 
albums (LPs). How would you get the 
Amstrad to tell you how many records 
you have altogether? 


HINT: singles =? 
albums =? 
records =? 


vord LET and it will still work. So instead 


Variable names 


In Amstrad BASIC, numeric variable names 
(or, as we have been calling them, ‘memory 
box labels’) can be: 


@ asingle letter, or 


@ almost any combination of letters and 
numbers (as long as the name starts with 
a letter), or 


@ a (descriptive) word 


Here are a few examples of numeric variable 
names that you could use: 
age, a, A, Al, A2, size, s, S, length, L 
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Boffin corner 
The technical name for this type ) 
‘memory box label’ is numeric variable, 
because you can vary the number in the 


memory box. 


To test this, type: 


LET cars = 12 
PRINT cars 


the number in the 


Now change (vary) 
memory box, by typ1n8; say: 


LET cars=1 5 
PRINT cars 


have kept your Amstrad switched 


hrough this chapter, you should 
nswer when you 


If you 


on allt 
now get a different a 


type: 


PRINT models 


From these examples you can see that you 
can use capital letters as well as small letters. 


So instead of typing: 


LET cars=10 
you could have typed: 
LET CARS =10 
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Provided you also type the w 
capital letters in the formula th 
just as well. 


d ‘Cars’ i 
nig Would 
Wop 


Remember 


1. You can put any number into th 
Amstrad’s memory by ‘labellin is 
memory box’, e.g. LET cars = a ° 
Technically, this is called asgj i 
value (50 in this case) toa oan a 
variable (which we have discitisa: 
name ‘cars’). » 


. The name of the variable (or ‘label’ 
be a letter, word or even a combin ) can 
of letters and numbers (e.g. LET seins 

LET A= 3, LET total = price + VAT) ” 


3. It is best to stick to small le 
labels or variable names. eh 5 i 
words in capitals that could be ' 
confused with a BASIC command lik 
TO or PRINT. (e.g. You must not use ° 
LET TOTAL = PRICE + VAT, because 
TOTAL and PRICE — in capitals — would 
be confused with the BASIC words To 

and PRINT) 


. You can check what number the 
variable contains, using the PRINT 
statement, (e.g. PRINT B3 or PRINT 
total). Note that there are no quotation 
marks round the variable names. 


ic variables to do 
,an use numeric varia 
5, You iene. by providing the Amstrad 
calcu formula that tells it how to work 
.g. LET models = cars + 


tra 
width) 


f you assign a new value to a variable 
Jy 


. o, ‘put a new number in the memory 
Ue the old value is lost (e.g., LET cars 


_ 5 followed by LET cars = 10 gives the 

answe? 10 when you type PRINT cars). 
You can leave out the word LET in 

‘Amstrad BASIC, so instead of typing 
LET cars =5, you can type just cars=5 
to get the same effect. Beginners often 

refer to use the word LET to help 

ind them what the instruction 


means. 


8. Although you can save typing and 
memory space by using single letters 
for variable names (e.g., c=5: d=7; h=3: 
p=c+d+h), it is far easier to understand 
what is happening ina program if you 
use descriptive words. For example, 
would you have guessed that the 
previous program meant LET cats = 5: 
LET dogs =7: LET hamsters = 3: LET 
pets = cats + dogs +hamsters? 
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i... Chapter 4 


VENT. 


eS 


: 


If you managed to struggle through the 
last chapter on numeric variables, and got the 
Mindbender questions right (or nearly right) 
_well done! That was probably the most 


difficult chapter in the book. 


From here on, it’s all plain sailing (well, 
nearly all!) and much more fun. 


Strings of things 
bers, the 


As well as remembering num 
Amstrad can remember letters, symbols, 


words and sentences. You store these in 
‘memory boxes’ in much the same way as you 


store numbers. But instead of typing, say: 


LET cars=5 


which would put the number 5 into a memory 
box labelled ‘cars’, you type 


LET name$ = “Brian” 
which puts the word ‘Brian’ into a memory 
box labelled ‘name$S’ (pronounced ‘name- 
string’, or, if you prefer, ‘name-dollar’). 


Now when you type 
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” Questions and answers 


PRINT name$ 


the Amstrad responds with the repl 
y: 


Brian 
Note that the quote marks have dj 
1SAppeagp 
ed! 


The only differences when you w 
store letters or symbols are that: ANt to 


a) The variable name must end wit 
dollar sign <S> — which you'll ee ° 
key 4. This tells the computer to ae e 
information in an area of memor oa 
is reserved for string variables. = ON 
different to the area where it ae ‘ 
numeric variables. 


b) The characters that you want to stop 
must be enclosed in double quote mark 
and must not be more than 255 ciatacen 


long. 


String variable names 
You can choose almost any name for a string 
variable, provided it won’t be confused witha 


word in BASIC and ends with a dollar sign (S). 


For example: 


eS, ns; friendS, f2S, answers. 
name: 


you can even store numbers in a string 
alike numeric variables, you can’t use 
Oa variables in calculations) e.g.: 
gtr 
LET address$="'19 Railway Cuttings, 
East Cheam” 


To get the hang of it, let’s try a simple 
program: 


19 LET name$ =“ Brian Jones” 

20 LET ageS =" is 16 years old” 

30 LET message$ =” and owns an 
Amstrad” 

49 CLS 

50 PRINT nameS 

60 PRINT ageS 

70 PRINT messageS 

89 END 


Note that there is a blank space after the first 
set of quotation marks in lines 20 and 30. 
Remember to press <ENTER> after each 
program line, then type RUN <ENTER™> to 
make the program work. 


Alter lines 10 and 20 to make the 
computer print your own name and age. 


Adding strings together 
When you are happy that the program is 
working correctly, LIST it, then type: 


60 <ENTER> 


followed by 
LIST <ENTERS 


Line 60 should now have disappeared. Now 
type a replacement for line 59, like this: 


50 PRINT name$+age$ <ENTER> 


and LIST the program again to check that the 
new line has replaced the old line 50. Then 
RUN the revised program. 


The name and age messages should now 
appear on the same line, and you should see 
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now why a space was needed after the first set 


of quote marks in line 20. Adding strings 
together like this is called concatenation. 


Test what happens if you delete line 70 
from the program by typing 


70 ~ENTER> 


and replace line 50 with 


5@ PRINT na me$+age$+messageS 


Mindbender 4.1 
Why does this program give a strange 


result? 


10 car$=""5" 

2@ doll $=""7"" 

30 toy$=doll$+car$ 

40 PRINT “total number of toys 
= ":toy$ 

50 END 


How can you change this program to 
make it work correctly? If you can, go 
straight to the top of the class! If not, the 
answer is at the back of the book. 


HINT: should we be using string 
variables or numeric variables? 
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Remember 


1. Variables that store numbers : 
numeric variables and variah : 
store strings of characters ar 
string variables. 


e Cal] 
legs that eq 
© calleg 


2. To distinguish a string variable f 
numeric variable, the name of then a 
variable must end with a dollgp ie String 
and the information to be stored ry (S) 

memory must be enclosed in daub, 

quotation marks. ° 


3. As with numeric variables, yoy iy 
not start the name with letters tha; . 
could be confused with the start of 
BASIC keywords. It is therefore bett 
to use small letters for all variable = 
names. 


. The string of characters typed betwe 
the quotation marks can be letters m 
words, spaces, symbols, figures or eve 
nothing at all! Empty strings like this. ° 


10 LET empty$=" ” 


can be quite useful in certain programs 


‘ You can store up to 255 characters ina 
string variable. 


can 


in a string variable, but you 
ds 1 


lations on these 
m calcu 
erfor 


umbers- 
tore the D t’ 
‘ie withou 
he 7? 


add strings together, using the 
You i gn. This is called 
"(plus 
+ 


ion, e.g. 
oncatenation, 8 
C 


ber in a numeric variable 
m . 
7 the dollar sign). 


ll as letters 
mbers as we 
have nu 


calculations, 
canno If you want to do 


LET Ag ~ Hello” 
LET nName§ =" AVID” 
LET Space$ =" 
LET D$ ~ AS + Space$ + name$ 


when you type PR] 


NT D§ <ENTERS, 
you will find it con 


tains ‘Hello DAVID’ 
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. Chapter 5 
* How to INPUT information 


bi 


CH) 
— 


It would be rather restrictive if we could 
only put information into variables from 
inside a program, using LET statements. 


In the BASIC language, numbers and 
words can be placed into variables from 
outside of the program, by using the INPUT 
command. This allows information to be typed 


in while the program is running. 


The best way to understand how INPUT 


works is to use it. Type 


NEW <ENTER> 
How it works 


then try this: 
Line 10 puts the words ‘Edd 5 
“ 1 y Amstrad 
> ev! computer$="" Eddy Amstrad memory box labelled ‘computers’ (Actually i 
stores each letter in a series of consecu ive. 
oy P re t 
re feeetigtl Please type in your name memory locations, but you needn't let this 
50 PRINT oye figs $ Oley ye at present!). The dollar sign (S) at 
60 PRINT ald end of the variable name, tells the Amstrad 
. : that it is to store ch 
de PRINT Nvnaneis “computes eae ace aracters rather than 


Line 20 simply CLears the Screen. 


Try to guess what the program will do, 


then RUN it to see if i 
if you were right. Line 30 prints a message on the screen, 
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eng you to type something in. 
askine : 


ave finished typing, you have 
Lean key. The Amstrad then 
ress information you have typed ina 
stores aie labelled ‘name$’ and carries on to 
aaa program instruction — in this case, 
then 


to p 


line 50. 


Line 50 prints the word ‘Hello’, after . 
pike Amstrad finds a semi-colon. This 
ae to print the next item on the same line 
tes 


as the last. 


But what is it that we want printing? 
‘Aha’, it thinks, ‘the programmer wants me to 
t the contents of the memory box labelled 
ames! So it prints whatever you typed in at 
n r, 


Line 60 simply prints a blank line, which 
helps to improve the screen display. You me 
leave this line out or delete it if you prefer. | r 
you could add another blank line by adding: 


65 PRINT 
to the program. 


Line 70 works in exactly the same way as 
line 50, but this time the message is different 


and, instead of printing ‘name’ after the 


Ow print the contents of the 
labelled ‘computers’. You told 
what to put in this box in Line 


‘Memory box’ 


the computer 
10. 


Line 80 tells the program to END, so to 


make it RUN again, you need to type RUN 
<ENTERS. 


Making changes 
Try changing line 70 to read: 


70 GOTO 30 


and see what happens. Type different names 
in when the computer asks you to. 


You will need to press 
<ESC> 
to stop the program. 


What would happen if you changed line 
70 to read 


70 GOTO 20 
or 
70 GOTO 10 
If you can’t work it out, try it and see! This 


produces a classic example of a bug in the 
program! 
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ick you can do with 


saving tyPin 
If a lot of typing. 


8 
There is 4 neat little tr 
{INPUT to save yourse 
is next program, but don’t 
t. It works the same way 
ut this time it asks you to 


pother to ty 
dof astring of letters: 


as the last pros” 
input 4 number instea 


10CLS . 
20 PRI NT“ How old are you? 


30 INPUT age 
40 PRINT ‘You are 
50 END 


‘sage; years old” 


uter gets to line 30 it waits for 
umber. (The Amstrad knows 
it wants a number because there is no dollar 
sign (S) after the variable name). Then it 
carries on with the rest of the program. 


When the comp 
you to type inan 


What happens if you type in letters 


instead of a number? 


bit complicated, but is 


Line 40 looks a 
u'll see what it does later, 


really quite easy. Yo 
if you can’t work it out. 


There is a neater way of writing this 
program, using INPUT to PRINT a message as 
well as waiting for information. This method 
joins lines 20 and 30 together. Type in and 
RUN this next program and see if you can spot 
the differences. 


19CLS 
20 INPUT’ How old are you “;age 


30 


30 PRINT’ Youare ”:; 
40 END 998," yea. | 
“Oly. 


Line 20 PRINTs the questig 
waiting for you to typea etre as we] 
in the numeric variable ‘age’ el ab 
better method than the first an 


as 
P S 

his is , tore, 
Uc 

€ you trieg h 


Line 30 tells the Amstrad to PR 
words enclosed in quote marks (“y, INT the 
followed immediately on the same in are") 
what the semi-colon means) by wh HIG (that, 
finds in the numeric variable mem ateven i 
labelled ‘age’. Ory box 


After printing the value of ‘age’ ; 
across another semi-colon that tells es COmeg 
continue printing on the same line. — 
the next item enclosed in quote mark it Drintg 
old’), before carrying on with the ne S (" Year 
program line. xt 


Note that there is a space after the 
‘are’ and another space before the wa 
in line 30. What would happen if you 
miss out these spaces? a 


years’ 
Te to 


Line 40 — you know what END does! q 
could you change this line to make the — 
program repeat itself? 


Pausing a program 

INPUT can also be used to halt a program or 
game for purposes other than the input of 
information. For instance, you can use it to 
wait until someone has read the instructions 
before playing a game. 


e's avery simple example, based on 
ert s program. Note that this ees 


u : 
ihe Pe _ go back to line 10 —and clear the 
are able wbich wouldn’t be possible without 
reed. a ie 
his use of INPUT 


7 the previous program, to check that 
memory, then type in just lines 49, 
o make the program look like this: 


Rie) 
.. oti] in 
50 and 60 t 


100 4, 7 
g INPUT How old are you “age 


30 PRINT” You are “Vage;” years old” 
40 PRINT:PRINT 
4) iINPUT’PRESS ENTER KEY TO 
CONTINUE”, AS 
69 GOTO 10 
Multi-statement lines 


pid you n 


wnstructions — separated by a full colon? 
i 


The Amstrad allows you to put several 
instructions on the same line, as long as you 
separate them with full colons (:), and . 
provided the total length of the program line 
does not exceed 255 characters (including 


spaces). 


Multiple statement program lines save 
memory space (and typing!) and help increase 
the speed at which BASIC programs work. 
This is important when you start writing 
arcade games. 


Question mark suppression 
Did you notice anything unusual about line 50? 


otice that line 40 contains two PRINT 


. No, not the f 
Capital lette 
Important tj 


act that everything is in 

Or appearance. The 
Nal we typed ina 
mi-colon before the 

ight seem a trivia] 

ct is quite interesting. It 
rk appearing! 


sae used a semi-colon instead ofa 
rs etween the second set of quotes and 

€ variable AS, a question mark would have 
Hea automatically at the end of the 
hea message. While this would not have 

one any harm, it would have looked a bit silly 
as we were using INPUT here to give an 
Instruction ~— not to ask a question, 


Dummy variables 

Another odd thing about line 50 is that we are 
not actually using the string variable AS to 
store information in as we normally would. So, 
in this instance, we call AS a ‘dummy string 
variable’. We are using it merely to check that 
the ENTER key has been pressed. 
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i _ short for 
Though we named it AS — 8° 
Answers you could just as easily have called 
lyS or RS. 


it answers, or rep 
< ENTER>, line 


ressed 
e screen 


After you have P a 
60 sends the program back to clear 

and start again. 
cluded INPUT to wait for 
a keypress in line 5 uld all happen so 
quickly that you mi 
anything! Test this by ! 
RUNning the program again. 


Number cruncher 

Let’s have a bit of fun with the name and age 

programs. Type 

10 INPUT’ Please type in your name i 
nameS 

20 CLS: PRINT 

30 INPUT’’Now te 
are “;age 

40 CLS 

50 PRINT’My goodness, 
old!” 

60 PRINT:PRINT“You are much older 
than ME...” 

70 PRINT’! was only invented in 
1984!” 

8@ LET years = 59 — age 

99 PRINT:PRINT’Do you realise 
that in only “;years;” years,” 

190 PRINT’time you will be 50 
years old??? iil” 


“Hello, “;nameS 
Il me how old you 


‘age; years 


RUN this program, and make sure that it 
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works, so far. Then be sure to y 
chapter to make sure you can epee the p 
cassette before switching the Paad: it is 
are going to add some more oo off 
later. PO ne. Mi 
“8 toi, 
t 


Mindbender 5.1 
Now for the 500 bonus points quest; 
Using two additional program Jvestion, 
could you make the program oa ho 
how many days old you are? Out 


HINT — there are 365 days ina 
worry about leap years). year. (Don 
— Your first line (110) should be 
a 


LET statement. 
— Your second line (120) should } 
ea 


PRINT statement. 


The answer will be given in Chapter 7 


Important 
Is your Amstrad printing the messages too 


high on the TV screen? If so, add 

: f ' a cou 
PRINT statements to the beginning of i 
program and after each CLS command like 


this: 
8 PRINT:PRINT 
20 CLS:PRINT:PRINT:PRINT ‘Hello, 


“-name$ 
40 CLS:PRINT:PRINT 


ber 


Remem 


| — re ee He a you use a semi-colon after 
Teele t Be entered fea ts e closing quote marks, 
keyboard while the program is 
nunning. It waits for the user to typea 
number or a reply. 


N 


- If you type the comma after the closing 
quotes, the question mark will not 
appear. This can be useful when you 


9, After typing in the information, you are using INPUT with a dummy 
must press < ENTER > to signal the variable to halt a program under 
end of the INPUT. _Ser-control, for example, while 


Instructions are being read, e.g. 


{INPUT must be followed either by a 
variable name, or by a prompt message 
followed by the variable name, e.g. 


59 INPUT “PRESS < ENTER> 
TO CONTINUE”, R$ 


8. A dummy variable is one which you 


age 
paige as wanted are not going to use to store 
ont soe information in. In the above example, 
NPUT nameS the dummy string variable R$ is being 
| used purely to test whether 


INPUT “What is your 
name”’;name$S 


<ENTER > has been pressed. 


9. To save memory and speed up 


4. Use a numeric variable name (e.g. age) program execution, you can include 
if you wish to INPUT a number. Use a more than one instruction under the 
string variable name (e.g. nameS) if you same program line number, provided 
wish to input letters, symbols or you separate the different instructions 
ieee with full colons (:), e.g. 


. The semi-colon after the prompt 10 CLS:INPUT’ How 
message is optional (You can leave it old are you”’;age 
out to save a byte of memory!). 


10. Program lines must not contain 
6. A question mark (?) is included more than 255 characters including 
automatically at the end of a prompt, spaces. 
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Chapter © 
7 and LOADing your 


SAVE-in$g 


rting to type in 


esta 
n how to save 


time to lear 
that you don't 
switch the 


Now that you ar 
longer programs, it’s 
them on cassette tape, so 
type them in again each time you 
Amstrad on. 


ADing programs may 


SAVE-ing and LO 
lly it’s very 


seem a bit tricky at first, but rea 


easy. 


Cassette Recorder 
At the right hand of the keyboard you will find 


the built-in Cassette recorder, the integral part 
of the Amstrad computer. 


der is essentially the same as 
found in any audio cassette recorder except 
that the Amstrad recorder offers two speeds 
for recording and reading programs. The 
Supersafe speed writes at 1000 baud (bits per 
second) and Speedload works twice as fast at 


2000 baud. 


The recor 


The control keys are the same as found on 
the normal cassette recorder. You will find 
that a ae keys need to be pressed 
considerably harder than t i 
are he keys on the main 
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have to 


[REC] = [REC]ord key pressed togeth 
with [PLAY] key will record data when ler 
instructed by the program in the memo either 
by a SAVE command entered from the ry or 


keyboard. 


[PLAY] =[PLAY] will read the data wh 
en 


instructed by the program or re 
ada 
from the cassette into the memory to ta 
command “LOAD” entered from the hee 
ard, 


[REW] =[REW]ind will rewi 
ja the besinning: rewind the tape 


[F.F.] = Fast Forward wi 
aide rd will advance the tape 


eae eae = When this key is pressed 
the cassette will stop running. When this ke 
is pressed the second time then the cassette ld 


nd allow you to remove or insert a 
required. 


will open 4 
cassette tape as 


[PAUSE] = This key should not be used 


when recording or reading programs, as this 
could corrupt the program. 


Cassette Tape ; 
Normal good quality audio cassettes usually 


work perfectly well with the Amstrad but use 
the shortest cassettes you can find. 


It is much better to use a C10, C12 or C15 
tape or C30 tape at the most than a C90 tape 
because this puts less strain on your recorder 
driving mechanism. It is also easier to find 
programs on short cassettes. Don’t use C120 


cassettes. 


Try to avoid using cheap ‘bargain price’ 
cassettes of the type sold by garages. These 


often have poor recording characteristics and 
SO May not record your programs correctly. 
Tape that looks dark brown (e.g. super ferric) 
often records better than light brown leg . 
ferric) tape. ~ 


SAVE-ing programs 
Follow these instructions carefully. 


1. Type LIST < ENTER » to check that there 
1S a program in the Amstrad’s memory. If not, 
type in a short program — any of the programs 
in this book will do. 


2. You need to tell the computer if you wish 
to use the Speedload (2000 baud) rate for 
recording or the computer will default to the 
Supersafe speed. 


For Speedload rate type: 


SPEED WRITE 1 < ENTER = 


The computer will automatically read the rate 
at which the program was saved on the tape 


originally. 


3. Think of a name of not more than 16 
characters for the program. 


4. Place a blank tape in the recorder. 
5. Rewind the tape to the beginning. 


6. When the tape is fully rewound, type 
SAVE “progname” <ENTER> 
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ayy Ghyiity you lila t 


program | 
othor ee 
1 | + 
truant Lov Leonngg cnnved dra une fonedt in double 
adv {ve ‘ , 

quote nieks 


he en yWebeon the 
hvelve 
loader on 


proAy and 
count alowdly bo 


b three potas tr 


Now pt ants 


( naselle ren orl, 
youl are pues 


throm preety 


make Sire 


the Lape 


ENTER 


program Haine 


oment, the 
ron wilh some 


4g. After am 
should appear on the sore 
numbers and letters. 


tell you when it has 


The computer W 
ing the prompt and 


finished SAVE-ing by show 
cursor (@). 

g. Before pressing the STOP button on your 
cassette recorder, SAVE the program again for 
safety, perhaps with a slightly different name, 


for example: 


SAVE” progname2” < ENTER> 


Make sure that the RECORD button is still 
depressed on your recorder and wait a few 
seconds before you press <ENTER > for the 
second time in response to the screen message 
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' Von, 
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When the tape han rework, py 
Dutton ana watch what ian Nhe py 
Hime Che prog ran naine shoul . Aor yy 
MP DOAP oy 4) 

tt 


logethor Wilh some numb 
v1" 


SECreael, 
perhaps lottors, Like this mand 
progname block $ 
progname2 block $ . 
K 


Mhis tells you that both copies of the 

have saved correctly, while leavin nom 
. . . 4 re J ~ 

original program in memory one 


Ifan ERROR MESSAGE 

IOSAGE sl 
then stop the tape, rewind and ae iia 
program again. a 


If both copies of the 
program are Q 
press the ESCAPE key to get the ae 


eae CAT command is very useful when 
you have forgotten the names of programs 
recorded on a particular tape. 


ams ; 
OT ere are two ways to LOAD 
dg, 


tape. The LOAD “progname” 
aaa ram into 
ost imply loads pean or RUN it 
a | mand © : yu can LIST, a . 
com ory 80 ¥¢ ou can LOAD and RUN the 
mem nly using the CHAIN 
ulo 


ypernal® 

} ‘ a d 

, ral " mand. 
sete s** com 

pres name © 

“pl 


Lt  aeeeeee 
, Amstré 
on vam fron 


t's ry using LOAD oe 
Le 


our computer OFF then ON. Now it 
aaitch Y 
* . plank memory 
7 i have 
th the program you 
ape, wit 
9 Place the i ae it, into the recorder. Make 
‘ust recorde tape is rewound to the correct 
e 


re that nat te the tape completely if you 
ition, Te 


he beginning. 


su 


ing instruction: 
the followl 
3, Type 


LOAD’ progname” <ENTER> 


oe ou called 
. ame” is the name y 
(where ca you saved it). aia 
your prog ecify the name if you want 
need to ine joa & particular program. 
sainccnaaeree next program recorded on the 
just WwW 


tape, you can type: 
LOAD” <ENTER> 


king sure that there are no letters or spaces 
eee the two sets of quote marks. 


4. The MeSSape 


Press PLAY then any key 


should Appear on the Screen 


5. Press the PLAY butte 


Non your Cassette 
recorder and then pregs - ENTER 

6. When the Computer finds the Program, the 
word 


Loading 


appears, follow 


ed by the Program name and 
block number. 


7. When the computer has success{ 
LOADed the program, it will 
and cursor, 


ully 
show the prompt 


You can now LIST and 
RUN it, in just the sam 
typed it in. 


alter the program or 
€ Way as if you had 


CHAINing programs 


CHAIN"“progname” LOADs and automatically 
RUNs the program. 


To use it, follow the same procedure as 
above, but instead of typing 


LOAD" progname” < ENTER> 
type 


CHAIN ‘progname”’ <ENTER> 
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or just 


which LOADs and RUNs the next program on 
the tape. 
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CHAIN’” ~ ENTER > 


Remember 


1. The command SAVE“progname” is 
used to SAVE a named program. 


2. The program name must not be more 
than 16 letters long and can contain 
spaces Or symbols, e.g. 


SAVE’ progname”™ 
SAVE” prog— name” 


_ Be careful not to SAVE programs on top 
of other programs already recorded on 
a tape, unless you want to lose the 


programs you are taping over. 


ise) 


4. Be sure to wind past the plastic leader 
before you start to SAVE a program. 


5. LOAD“ (with no space 


. The command LOAD“ 


. CHAIN"progname” will LOAp 


. Keep a note of what is on your tapes h 
s 


. CAT will check that your program h 
as 


quote marks) tells the © betwee 


LOAD the first 
progres 
the tape. aoe 


the 


eR ty 
it COmeg 


pro Ne — 
Ta r 


computer will continue 

Searchj “The 
through the tape until it faa m 
program you have asked foe, = 


then automatically RUN a es = 
e 


program. If the program name; 
missing, i.e. CHAIN“”, the ae 
CHAINSs the first program it fj an 
the tape. eo 


noting the number on the tape count 
er, 


saved correctly and tell you what 
programs are on a tape. After verify; 

a tape, press <ESC> to get the pr ying 
and cursor back. ompt 


«o..., Chapter 7 
“ae? 
| Gf 


REM, RENUMBER and EDITing 


d of Chapter 5 we left you with a 
ee a do you make this program print 
anes days old you are? 


Att 
roble™- 
oul how 


|NPUT “Please type in your name 
10 “nameS ; re $ 
1 S:PRINT‘Hello, “;name 
A CIPUT” Now tell me how old you 
= are ‘sage 
40 CLS 


PRINT’ My goodness, “;age;"’ years 
50 


q"" 


9 PRINT:PRINT”You are much older 
‘ : 


E”’ 
70 ata was only invented in 
1984!” 


s=50-age 
as ORINT:P RINT“ Do you realise that 
” inonly “;years;” years” 
0 PRINT“time, you will be 50 years 
” old? 271’ 


Hopefully, you will have SAVEd this 
Pie on tape, so you can now load it in 
. 
an cassette and LIST it. 


From the hints we gave you, you know 
that you need to add two lines. The first 


should be a LET Statemen 
numeric variable ‘years’ b 
daysina year) —and 
anew memory b 


t, multiplying the 

y 365 (the number of 
putting this number into 
0x, which we'll call ‘days’: 


1 10 LET days = age % 365 


Ignoring leap years, this would mean that for 
someone who was exactly 10 years old (to 
make the maths easy)): 

days=10* 365 
therefore: 


days =3659 


In other words, on your tenth birthday, you 
would already have lived for 3650 days! 


All we need now, is one extra line to 
PRINT this information on the screen: 


120 PRINT:PRINT“You have already 
lived for ";:days;’’ days’ 


trick to 
You can use the same, easy trick to 
convert days into hours — bearing in mind that 
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there are 24 hours in each day: 
days * 24 
equals an 
hours 


430 LET hours = 
1490 PRINT: which 
amazing “hours; 


Mindbender 7.1 
How would you extend the program by 


lines to make it print out the 


four more 
d the number of 


number of minutes an 
seconds you have lived? 


HINTS: there are 60 minutes in an hour 
there are 60 seconds in a minute. 


To make it a bit more interesting, you 
could use the phrases in your PRINT 
statements, like “ora staggering” and 
“which means a mind-boggling”. 


Our suggestion is at the back of the 


book, but try to work out your own 
solution first. It’s easier than you think! 


REMarks 
Now that you are typing in longer programs 


and (we hope) SAVE-ing your programs on 
cassette tape, it’s time to introduce the BASIC 


programmer’s best friend, the REM statement. 


Add this line to your Age program, then 
type LIST, 5@ to see what happens: 


5 REM ***** AGE HHHEKH a ENTER> 
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REM -— which is short for REMark — ll 
you to add titles and remarks toa ate in 
listing that REMind you what it is oa 


You can put REM state 
ments an 
the program, not just at the Rega 
these extra lines: Bety 


Te in 


25 REM * Find outa = 
ge <ENT 
105 REM * Work out how a 
days old * <ENTER= 


~ N ee that the stars aren't really necessary 
e put them int i ier 
ae o make the REM lines easier 


You can also add a REM statement to the 


gram line, like this: 
: p? 5 . 
ond 7 hours = days aa oie 
LE the num 
130 * | ulate 
ca 


u remember to separate the 
0 . 
povided ¥ with a full colon (:). 
teme 


i es everything ona 
uter ignor ome 
4 nqgmes to a REM caer ae 
fter eens the next program line. So 
ines : would not have any effect: 
carhe™ ng line 


EM clear the screen:CLS 
6R 


a: 
ne would (please type it in!): 
his 0 
putt 


the screen 
-REM clear 


irst version would not 
The reasoD ener Amstrad i ia 
work is ea statement, so it Selinn s cae 
it finds a R xt program line — not a ra ; 
on to the Ge instruction at the en = 
there is @ ut the CLS first, it sees 
But if you oe before meeting the - 
tS and moving to the next prog 
stateme 


line. 


ae program should now work 
Altho 


we because we ha ve added SO many 
| ‘a is the ne numbers ook a bit of a 
a i ’ li jl 
exif ’ 


mess, e.g. 


HEHEHE 
REM ***** AGE 
: CLS:REM clear the screen 


TOINPY 
Names “Se type 'N Your name 
: He lo ’, 
INPY No 
are "ag w tell me how old you 
Never Mind! Your A 
: , mst 
magical command to ¢ rad has another 


After a moment or two, the 


Prompt and Cursor 
should Teappear. So type 


LIST, 69 — ENTERS 


and your Program should now look like this: 


1@ REM KRERR AGE KHER 
20 CLS:REM 
30 INPUT 

Name$ 
40 CLS:PRINT” Hello, ““name$ 
5@ REM * Find out age * 


60 INPUT’ Now tell me how old you 
are “age 


clear the screen 
“Please type in your name ” 


and so on. The RENUM command has 
renumbered the program, so that it not only 
looks more ‘professional’, but also leaves you 


more room to add additional lines if you want 
to. 


If, instead of typing RENUM <ENTER>, 
you werte to type 
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RENUM 20.5 © ENTER © 


Ibe renumbered starting al 
‘the normal tg)and going UP 
ruse RENUM 

kh to normal. 


ogram wi 
tead 0 
5, Try it, Thet 
agel it bac 


Your pt 
line 20 (ins 
isteps ot 
—ENTER> t 
further, be sure to 


any 
ir Age progrant. 


Before YOu $9 
SAVE the latest version of yol 


Holiday exchange 
Now for some more Amstrad magic. that 


should save you 4 lot of typing. Type 


NEW ~ENTER~ 


his new program, which could be 


then type int 
going to Spain for your 


handy if you are 
holidays: 


HE 


10 REM *** exchange 


20 LET rate= 220 
30 INPUT’ How many pounds do you 


wish to change -nounds 
40 LET pesetas= pounds * rate 
50 PRINT’’For “-nyounds;. 


sterling” 
60 PRINT’ You will receive approx. 


spesetas; pesetas in Spain” 
70 PRINT “at the exchange rate of 
‘rate; pesetas” 
80 PRINT“ per pound sterling.” 


‘ pounds 


A RUN the program and make sure it 
works properly. If it ‘ i 
ulsee! y. If it doesn’t check for typing 
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‘The EDIT keys 
If you've typed the program in pry 
. a ) ri 
should work, but it still looks a ian 
Ol 4g 


Mogg «6 


the screen! 
We could improve it a bil, by aq 
wad ; iby add; 
CLS instruction al the beginning an ria 
. : . “ep § and ¢ 
before il prints oul the information 7 no ep 
time, instead of adding, say, DUE thig 


25 CLS - ENTER ~ and, say 
45 CLS ~ ENTER» 


we'll EDIT a couple of CLS commands j 
existing lines. Learning how to EDIT > Mato the 
to save you a tremendous amount of : 80in 
later on! yPing 


Look at the top right hand c 

fa} Oorner 
keyboard. Can you see the keys with : dee 
printed on them? These are the CURSOR 


CONTROL keys that you use for EDITing 


programs. 


LIST the program and follow these 
instructions carefully. 


Hold down the SHIFT key and press the UP 
1) OW key twice. The ‘COPY CURSOR’ 
ARR tes from the main cursor (they both look 
separa e). The copy cursor is placed over the 
ashe in the line i.e. 8, leaving the 
ae cursor behind like this: 


[8]0 PRINT “Per pound sterling’ 
READY 


i : FT key and 
tinue holding the SHI 
: ae the UP ARROW key until the copy 
nee is level with line 20 of the program, like 
this: 


[2|® LET rate=220 
If you accidentally go too far, use the DOWN 
ARROW key to bring the copy cursor level 
with line 20. 


3) Now use the key marked COPY to move the 


~ursor to the right hand end of |i i 
looks like this: eee 


20 LET rate = 2208 


As the COpy Cursor moves along the line, notice 
that a COPY of the line appears at the 
bottom of the program: 


80 PRINT“ per Pound sterling” 
20 LET rate= 2208 


4) When a COPY of the whole line has 
appeared at the bottom of the program, typea 
full colon, followed by the command CLS. 


You should find that while line 20 at the 
top of the screen remains as it is everything 


you type appears on the COPY line at the 
bottom of the program: 


20 LET rate = 220:CLS & 


If you makea mistake, use the DELETE key to 


rub the wrong letter(s) out and re-type it 
correctly, 


5) When you are sure that line 20 is correct, 
press 


<ENTER> 


and LIST the program again to check that the 
new line 20 has replaced the old one. 


Now make exactly the same alteration to line 
40, so that it reads like this: 
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40 LET pesetas = pounds * rate:CLS 


w RUN the program again, to 


isn’t it? No 
ll working OK. 


Easy; ' : 
hat everything is st 


make sure t 


Inserting 
You can use the cursor con trol keys and the 
ke practically any alteration 


COPY key to ma 
you want — inserting, deleting or changing 


program lines. 
Inserting letters or words is just as easy. 
e you want to insert something in the 


Suppos 
middle of a program line. For example, let’s 
sh’ before the word 


insert the word ‘Spani 
‘exchange’ in line 10. 

First, CLear the Screen for action and list 
the program again, with 


CLS <ENTER> 
LIST <ENTER> 


Now follow these steps: 


1) Use the SHIFT and up arrow to bring the 
copy cursor up level with line 10 


[110 REM *** exchange *** 
2) Use the COPY key to move the cursor along 
the line until it is in front of the first ‘e’ of 
exchange. The copied line at the bottom of the 


program should now look like this: 


10 REM *** @ 
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like this: 
10 REM *** Spanish m 


Again, if you make a mis 

key and type the letters) ano he Dey 

4) Finally, use the COPy key t | 

of the old line 10 until it looks likey the pp ' 
@ this. 


1@ REM *** Spanish exchang . 

O tee 
and then press <ENTERS. LIST th a 
© pr 


to check that everything j; 
? : 8isas 
then RUN it again, just to be ote 


Ogra 
Want it toby 


Deleting 

Deleting (or ‘Editing-out’) characters ; 

easier than inserting. For example . 18 even 

the word ‘exchange’ from line 19 oe 
would; 


1) CLear the Screen and LIST the pro 
8tam, 


2) Use the SHIFT and UP AR 
RO 
the copy cursor level with line i keys to get 


[1]0 REM *** Spanish exchange *** 
i Use the COPY key until the cursor is on the 
irst ‘e’ of ‘exchange’. The copied line at the 


bottom should now look like this: 


10 REM *** Spanish @ 


. the SHIFT and right arrow keys to 
4) No ae yy cursor Lo the space following 

4)" fc the CO ene Nothing will have 
mo wo “d soar bottom line, but the old line 
e yened aiild now look like this: 

he top § 


qt (0 ; 
: HH 2 hange my *** 
ad REM * Spanish exchang 


use the COPY key again, to copy the 


Finally: 1. The line at the bottom should 


: li 
4 of the h 
ren 100k like this: 


10 REM *** Spanish ***@ 


s <ENTER> and LIST the program 
Now Pou have deleted the word ‘exchange’! 
again. 
. sing the cursor control and COPY 
tice 1 ou can use them to insert, change 
wie acters without having to think 


prac 


S 
a delete char 


about it. 


nts : ‘ 
ae delay still looks a bit untidy. For 
Our s 


i ine i lose to the top 
‘no. the first line is tooc 
srnene TV screen. So let’s add a couple of 
ie before it starts printing: 


<ENTER> 


T:PRINT 
rag < ENTER> 


45 PRINT:PRINT 


Now use the cursor control keys and the 
COPY key — exactly as you've learned above — 
to edit some of the PRINT lines, so that the 
messages fit on the screen more neatly: 


50 PRINT’’For “;pounds;’”’ pounds 


Sterling, you will’”’ 
60 PRINT” receive approx. 
pesetas in Spain” 


If you can, be Sure to SAVE the revised 


Program before doing the Mindbenders. 


Mindbender 7.2 

How could you alter this program (using 
the CURSOR CONTROL keys and COPY 
key) to make it calculate and print the 
number of Italian lire you would get for 
British pound notes? 


HINT: At the time of writing, you would 
get 2395 lire for £1 sterling, so use rate 
=2395. 


Don't forget to SAVE your answer 
before doing the next Mindbender. 


Mindbender 7.3 

If the bank gives 11.9 francs per £1 
sterling, how would you alter the program 
for a holiday in France? No hints this time 
because it’s so easy! 


Our suggested answers are given at 
the back of the book, but you should be 
able to do these yourself! 


“;pesetas:”’ 
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Remember 


Marks toa 


_ REM enables you to add RE 
ber what 


program, to help you REMem 
you are doing. The Amstrad ignores 
everything else on the program line 
after it meets a REM statement. 


-You can use REM anywhere in the 
program, but if you use it in a multi- 
statement line, be sure to make it the 
last item in the line — like this: 


50 CLS: REM clear the screen 


. RENUM (start at), (step) enables you to 
renumber your program from line 
number (start at), in increments of (step) 


lines, e.g. 


RENUM 109,5 <ENTER> 


will renumber the program, starting at 
line 100 and going up in steps of 5. So 
the program will start with line 100, 
then go on 105, 110, 115, 120, etc. 


. The four arrow keys on th 


. RENUM is very useful fop 
(@) . 


Nin 
= you are : Up 
ae betwee 
N 


gaps between lines’ whe 
adding several more lin 
existing program lines. 


corner of the keyboard pass rj 
e 


cursor control keys. 


ght 
d 


. To edit a program, you first LIST th 
e 


program (or just the lin 

interested in). Then oo iis 
down arrow keys together oath oe 
key to position the copy cursor }; Ap 
the line you want to edit. Ne on 


. Use the COPY key to copy the Haat 
8 of 


the line you want in the new lin 

in any new characters you ane Type 
insert and use the SHIFT and ri ht 
arrow keys to skip over any ie t 
that you don't want. Facters 


. Press ~ ENTER > to confirm that you 


have finished editing the line 


Chapter 8 


a Colour MODEs 


i tant 
look at some more impor 
a nde we shall take a break and 


Before 


ASIC want some of the modes and 
imen 


nds on the Amstrad. 


is able to work in three 
et seni from Oto 2. 
differen’ Es affect what you can do on the 
These ee colours you can use and what size 
screen: be printed. Only one mode can be 
letters 


ime. 
used at any one = 


been working in 

ow, you have ; 
“this is the default mode — which . 
MODE ; mode you get when you first switch 
sagem and you haven’t asked for 

on the 


anything in particular. 


Upt 


In MODE 1 up to 4 of the 27 colours can be 

i ny time. This mode uses normal 
pace — 40 of these will fit into one line 
ee the screen and it gives you 25 lines. 


In MODE 2 up to 2 of the 27 colours a be 
used at any time. This mode uses very sma 
letters, so 80 characters will fit across the 
screen and it gives you 25 lines. 


In MODE 9 up to 16 of the 
be used at any time. This mode uses very big 
letters, so only 20 characters wil| fit across the 
screen and it also gives you 25 lines. 


27 colours can 


There is a choice of 27 ink colours. See 
Figure 1 fora complete list of ink colours and 
the related ink numbers. 

You can change the colour of the 
BORDER, the PAPER or the PEN all 
independently of each other. The BORDER is 
the area surrounding the PAPER. The PAPER 
is the area inside the BORDER where 


READY ¢ ! PEN 
7 po} | 
| <«—————BORDER 
«paper 


- CTM 640 7 
AMSTRAD COLOUR MONITOR 
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characters can appear. The PEN is the colour 
of the characters. 
When you first switch on the computer 


you will find the BORDER and PAPER 
colours are both blue and characters in yellow 


(PEN). 
You can change the border colour by 


using the BORDER command and any of the 
ink colours shown in Figure 1 (page 50). 


Now type in: 
BORDER 16 and press < ENTER> 


You will see the border colour is changed 
from blue to pink. If you refer to Figure 1 you 
will see that ink number 16 is pink. 


You can also make the border colours 
flash alternatively between the two colours. 


Now type in: 


BORDER 16,26 and press < ENTER> 


The ink number 16 is pink and 26 is white, 
so the computer is flashing pink and white 
border colours alternatively. 


You can change the paper or pen colours 
by using PAPER or PEN commands. There is a 
total of sixteen pens/papers available on your 
Amstrad. They are numbered @ to 15. These 
numbers are not the colour numbers shown in 


Figure 1. 
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Figure 2 ( 
page 50) Sh 
Owes 

pen/paper numbers and he he m; 
(numbers) colours availat ‘s ASSO; alr, of 
thre 4. able “ate? 
siden: You will find - each © ink 
understand by using the Pap esier ty the 

commands. APER ang. 
Pr 
“Ny 


Type in: 


PAPER 2 and press — ENTER 
If you refer to Fi 

the PAPER/PEN uta See un 

along the same line in MODE 1 YOu now i i 

see the ink number is 29, If tk Column en 

Figure 1, the ink colour chart Tow to at : 

is bright cyan. ev OU wall fing 24 


If you clear the screen ( 
Pace CLS 
you'll find the paper colour has chemend) 
blue to bright cyan, leaving the aE Nged from 
colour still in yellow. (characte 


Now type in: 
PEN 3 and press < ENTERS 


If you can again refer i 
see 3 under the paper/pen ie ane a 
read along the same line in MODE 1 ae 
you'll see the ink number is 6. If you soe 
at Figure 1, the ink (number) colour 6 is bright 


red. 


Type in the program below, to see what 
the different MODEs are like and to see all the 
available colours in each of the three modes. 


e still using CLS and NEW, aren't 
r 
you @ 


you! m*** MODES & COLOURS **« 


| 
20 Mor “Which MODE (@ to 2 only) 
N 
P choice —_ 
, E chol 
BEN pennumber 
6 NT “This is PEN number 
10 An mber:” in MODE” :choice 
“Pp 
INT 
oe RIEXT pennumber 


RUN the program using each of the 
Now 
three modes. 


letter sizes are 
You can 


different in each mode. 


i letters 
ses normal sized 
ete a very small letters 
MODE @ uses very big letters 


should have also seen the available 
ea ae each of the modes. 
co 


a ie Modes & Colours programs 
Let’s se 


works. 


Line 20 — CLears the screen and ee the 
computer in MODE 1. There is no need fora 
CLS instruction here, because whenever you 
change the mode the screen clears 
automatically. 


Line 30~w 


ails for yoy to type in ¢ 
2 ina 
number, The number jg Stored in q variable 
choice’, 


Line 49 chang 
Chosen in line 39. 
choice igs used. 


es the MODE to the number 
Notice how the variable 


Lines 50 
loop, we'll ha 
later on. It fe 
memory box 
used in line 7 


and 90 are part of FOR/NEXT 
ve a look at loops in more detail 
eds numbers from ® to 15intoa 
labelled Pennumber which is 

® to set the pen colour. 


Line 60 - Selects the pen colour. 


Line 70 — Prints a message in a colour set 
by the PEN command in line 6@ within a 
selected MODE. 


Line 80 — Prints q blank line. 


The 27 colours available are listed in 


Figure 1, each with their INK reference 
number, 


Mindbender 8.1 a 
Why did all the lines in MODE 2 print in 
one colour (i.e. in Yellow)? 


And why did it miss out all the even pen 
numbers i.e. 2,4,6 etc? 


HINT: How many ink colours in MODE 2? 
(see Figure 2 then Figure 1.) 
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the most colours ( 
16 of th 
short program to . 
n short prog colours) including the flashin Vailaby, 
es. 


lours in MODE 9. 8 on 
. The BORDER command j 
S used te 


change the border colour 6 
27 colours shown in Figure eny Of the 


ace is . The PAPER/PEN Number j 
change either the paper or ‘ 
colours. 


Mindbender 8.2 

Try writing your OW 
show the Amstrad co 
See example at the back of the book. 


used to 
he Pen 


1. The Amstrad has 3 screen MODEs. 
These are numbered from @ to 3. 


. Changing mode in a program a 
€a 


screen — just as if you’ve typedc TS the 


2. MODE 0 is the only mode which uses 
LS. 


MAIN COLOUR CHART INKCOLOUR 
Paper/ POUR 

Pen Vo. Mode @ | 
Ink Ink Ink Ink co Mode 2 
Number Colour Number Colour @ 1 1 | 
1 24 24 4 
g Black 14 Pastel Blue 2 28 2g 24 
Blue 15 Orange 3 6 6 a 
2 Bright Blue 16 ~~ Pink 4 26 1 24 | 
3 Red 17. Pastel Magenta 5 2) 24 1 | 
4 Magenta 18 Bright Green 6 2 20 24 
5 Mauve 19  SeaGreen 7 8 6 1 | 
6 Bright Red 28 Bright Cyan 8 10 1 24 
7 Purple 21 ~~+Lime Green ) 12 24 1 | 

8 Bright Magenta 22 Pastel Green 19 14 2g 24 
9 Green 23. Pastel Cyan 11 16 6 1 | 

1@ Cyan 24 Bright Yellow 12 18 1 = 
11. Sky Blue 25 Pastel Yellow 13 22 24 1 
ee Yellow 26 Bright White 14 Flashing 1,24 20 s | 
3. White 15 Flashing 16,11 6 ss | 
Figure 1: The INK numb : | 

ers and colours Figure 2: PAPER/PEN/MODE/INK reference 
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Chapter 9 


Round and round we go 


we get back to some simple BASIC 
ye very important that you try to 
work: nee d this chapter, where we are going 
rs 


vm 100k at loops: 


previous chapters, you have used 
mae make the computer repeat a section 
GOTO vam. The computer has then continued 
of gel g the program until the ESCAPE key 

ea 
ae pressed, twice. 

There are better ways to make a program 

without using GOTO. In fact, using 
n big programs makes them difficult to 
o use GOTO as little as possible. 


repeat, 
Goro! 


follow, so try t 


EXT loops 
LU command to help us repeat a section 


¢ program uses two special lines which allow 
0 a control how many times you want the 
tea repeated. Instead of using a long- 
winded way of talking about ‘repealing 
sections’ we shall use the word loop from now 


on. 
Try this example of a loop. Remember to 


type NEW and CLS. You are used to it by now 
but might be getting a bit lazy! 


10 REM *** Loop *** 

20 MODE 1 

30 FOR a=1 TO 20 

490 PRINT Loop “sa 

5@ NEXT a 

69 PRINT“Finished the loop.” 
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With a FOR/NEXT loop, you have 
complete control over the number of times 
something will happen. This program prints 
the word ‘Loop’ (with a number after it) 20 


times. 


ery top of the loop — line 30 — the 
special FOR command is used. At the bottom 
of the loop — line 50 — the special command 
NEXT is used. FOR and NEXT always go 
together, so such loops are called FOR/NEXT 


loops. 


At the v 


Line 30 really means, ‘do the program up 
to the NEXT line 20 times’. The numeric 
variable ‘a’ keeps count of how many times the 
loop has been done, so it is called the count 
variable. You can see that ‘a’ is printed in line 


40 after the word Loop. 


The BASIC word TO is used to tell the 
ow many times to do the loop. FOR 


computer h 
@ times’. Note 


a=1 TO 50 means, ‘do the loop 5 
also that because computers often start 
counting at number @ (zero) instead of 1, the 


line: 

FOR count=9 to 50 
means, in effect, ‘do this loop 51 times’, 
because there are actually 51 numbers 
between @ and 50. So if you wanted it to do 50 
loops, starting at ®@, you would have to type: 


FOR count=@ to 49 
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Mindbender 9.1 
Now you try Writing a 

out the word ‘Hello’; p 
times. and 


TOgram 


to p 
your Name Ni 
5 


HINT: You will need to 
40 in the above p 


alter ]j 
er line 
Ogram, “ae and 


Times tables 
This next short pro 
! gram, pri 
a - You choose which table on the ‘tin, 
Sti outside the program using a to be Dring, 
PUT. Try it first, then we'llh uF ol ri “d 
how it works. AVE a look 
Ok at 
10 REM *** TIMES T 
20 MODE 1 ree 
30 PRINT’TIMES T 
A 
4® PRINT —_ PROGRay 
50 INPUT’’Which ‘x timest 
want ‘’,number 
6@ CLS 
70 PRINT’ This isthe ”: 
times table.” et: 
80 FOR n=1 TO 12 
990 PRINT n;” x “snumber:” =”. 
n*number >? 
100 NEXT n 
110 PRINT 
120 PRINT “Press a ke 
ytor 
130 G$=INKEY$ “— 
135 IF G$=""" THEN GOTO 139 
140 RUN 


ble’ do You 


awit Ot ee many of the BASIC 
We pros that you have studied SO far. Line 
ne ar choice of times table in the 
riable ‘number’. Line 80 tells the 
numese \15 do the loop 12 times. You can try 
corn more than 12 if you like. 
kin 


2 90 looks complicated but if you study 
Ly you will see that it prints both the 
it care its answer. The answer is the ‘n * 
gum an” art, ‘n’ is the loop number and the 
pe ig the value you INPUT at line 59, 
‘qui 
fs imagine that you had selected the 5 
e ple (making ‘number’=5) and the loop 
s ta hed, say, its 6th time round (making n 
g would then first PRINT the 
the value of ‘n’), followed by ‘x’, 
(the value of ‘number’), followed 
ae followed by 30 (which is the result of ‘n 
ee ). When n= 6 and number = 5 ‘n * 
omes 5 * 6— which equals 39! 


time 


x number 
number bec 


Next time round, ‘n’ will become 7 and 
stays the same (5). So ‘n * number’ 


‘ r ; : 
numbe 17 *5=35- which is what Line 99 


will equa 
will print. 


Perhaps you could change the program so 
that it uses some colour. By now, you should 
know how to use the PEN/INK commands in 


the 3 MODES available. 


Shooting stars 
This program below uses a loop to move a star 
across the screen. Try it. 


10 REM KH HR ; 

20 MODE 1 Shooting Stars *** 
30 CLS 

49 FOR cot 


umMn=2 TO 
5® LOCATE columni> 
5 


The position of the star across the screen 
1s set by the FOR/TO statement in line 49, 
which starts by making ‘column’ = 2, then 3, 4, 
5, etc until it reaches 40. 


So the value of ‘column’ in lines 50 and 70 
also starts at two, then increases to 3, 4, 5, etc. 
The effect (in line 60) is that a star is printed 
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first in column 2, then in columns 3, 4,5, ele 
until it reaches column 40 — which is the 
farthest right-hand column in MODE 1. (In 


other modes, the maximum column number 


might be 20 or 80). 


80 prints a blank space where the 
ar had been printed. If you try 
vill end up with a line 


Line 
previous st 
leaving line 8@ oul you \ 
of stars printed across the screen. By rubbing 


out the previous star after the new one has 
been printed, you get the effect of a star 


moving across the screen. 


Now you see it... 
The star is rather fast! You can slow it down by 


putting a delay loop inside the first loop. This 
goes after the star has been printed and 
rubbed out from its last position, so add the 


line: 


85 FOR delay=1 TO 100: NEXT delay 


This will slow down the star. Experiment 
with different values in line 85. Instead of 100 
you might try 50 then 200 and so on. 


Placing one loop inside another like this is 
OK, but the two loops must not overlap. The 
second loop must start and finish inside the 


first. 


Experiments in TIME 

When you start programming arcade games, 
the speed at which things move across the 
screen will become very important. Although 
BASIC probably seems very fast at the 
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moment, in com 


ule 
slow! ler lermy 


IL ig realy 
; 50 you will often ne 
find a way of speeding tk i 

scientific way of lesling "NBS up, | Aiba 
is really faster than ek 
command. se 


ed to Sao; 


On 
— USing , Met 
lg the pi" 
. \ 


Built into your Amstragq ; 
accurate timing mechanism is 
every 300th of a second, It k is 
the elapsed time since the ¢ e 
switched on. i 


4 prety 
lich je. 
eDc 1S Dd; 
PSa ren Ale 
™Mputer w,, 


as 


You can note the ti 
finished an operation within wotatted an 
The calculated difference tai Progra 
noted times should tell you eee the two 
hundreths of seconds the sheniie three 
took. * Operation 


Let’s try it in your Shooti 

by adding these four lines: a Program, 
35 STARTTIME=INT 
= Tl 

100 ENDTIME = (TIME/s09) 
110 ELAPSEDTIME = ENDTIME 

STARTTIME - 
120 PRINT ELAPSEDTIME;"seconq 

7 Ss" 


Note that to turn the time into seconds 

need to divide it by 300. The effect is ts a 
how many seconds it takes for the star to an a 
across the screen. RUN the programa aoe 
of times and note the time down. 


e the delay loop, by deleting 
i am again a few times 


w rem r 
Nov UN the ee fractionally). 


may vary 
way we could speed the 


there ee more? Well, yes — if you 
up © bit more work. 


5. 
jn’ eins 


ptr 
ovr mind con 
op _, the same way that you don’t 
pire in clude the word LET in lines 
e 
ly hav 
soa! 
ike’ eT STARTTIME =(TIME/300) 
35L 
_ at bother to include it above) you 
(50 we dl ae out the name of the count 
n also ee a NEXT statement. So see if it 
iable @ difference to the timing if you 
in line 90 to read just: 
chan 
99 NEXT 


faster? In a small FOR/NEXT loop like 
git any 14 difference is probably very small, 


Ls oop — say from 1 to 1009, it could 
eee enormous difference. 
ma 


ing worth trying is to use the 
ihe i. to EDIT line 40 to make 
a ae multi-statement line, containing the 
ee ae FOR/NEXT loop, and separating 
ae statements with full colons (:) like 
e 


this: 
40 FOR column=2 TO 49: 


LOCATE column,12: 
PRINT “*”: 


Mputing, you will h 
Sense talked by other _ 


rogra - 
Programmers and even Written in books and 


Magazines ~ ab 
something up b 


Some People’s ideas work; 9 


out how you can speed 
y doing one thing or another, 
thers don't. 


To be sure — be scientific! Make up alittle 
test program to find out whether it is really 
worth doing... don’t let even the greatest 
boffins on the Amstrad persuade you that 
SUBROUTINES are better than GOTOs or 
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COSUBs unless you have tested it for yamine 
Like al] adults. they are sometimes Wrong: 

WHILE «-: WEND 
Now, there is another W 
The Amstrad has some CO 
other BASICS do not possess. 


ay of making a loop. 
mmands that many 


You may have been asked to do 
something while -_ Jike ‘look after the baby 
while Iam at the shops... 

Well, the Amstrad can be told to do things 
while a given condition is true, USINg a 
WHILE/WEND loop. The computer carries On 
doing a loop until a specified condition is met. 


The next program will help you to sce whal 


we mean. 
19 REM *** WHILE/WEND loop 


20 MODE 1 

30 aD 

4@ WHILE a~ 10 

5Q a=a+1 

69 PRINT a 

79 WEND 

80 PRINT “Finished” 


nH 


Notice that we have stopped using the 
word LET. You can add LET to the beginning 
of lines 30 and 50 if you prefer. 


At the beginning of the program the 
variable ‘a’ is made equal to zero. The 
computer is then asked to repeat all lines 
between the word WHILE and the command 
WEND while ‘a’ is less than 10. 
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Line 50 (which is insid 
to the value of ‘a’. So oe et a 
(a=@), it makes a=0+41, Sis log saa, 
time round, ‘a’ already equal ist lant | 
a=1+1, which makes it 2. The , 1 so it ben’ Rey 
already now equals 2, ‘gq’ a next tim Com, | 
which makes it 3, and so on OMmeg aso it 


his | 


Line 60 simply PRINTs 


that you can see what is ees valy 


ening, 


Remember — when you ise Wy 
must have some condition after jt 


Try changing line 4@ to~— 
40 WHILE a<20 
or any number you fancy. 


Cacaphonics 

Below is a program that makes a hopp; 
until you press the ESCAPE key. It Tid noige 
SOUND command. eN BBeS the 


Although we will not hav 

ug e the spa 
study the SOUND command in depth in thy 
book, we shall use the command to make : 
sounds later in the book. = 


Be careful not to make any typing 
mistakes. 


10 MODE 1 
20 WHILE TIME > 1900 
30 SOUND 1,15,RND(255),5 


49 WEND 


ful 
D loops are very use 
ae the computer do 

a 


WHILE! 


u C 


] over the program, 
zone! a a lot of conte 
) 


2 ; 
ete alter the Shooting stars 


o that it uses a WHILE/WEND 


.adb 
Now oot 


Ss 
Jo0P: } 


‘11 need to combine Shooting 
poms some of the ideas in the 
SWHILE/WEND" program. 


HINT: 


er 9.3 : 
Mind bers seem to believe that 
ost € 


far superior to 
END loops are 
WHILEKY FOR/NEXT loop. Use the 
the command to test whether uae 
ce is in fact faster than 
END loop is in 
HILE/W 


the FOR/NEXT version. 


hich version of the program would 

i k uses the least memory? Each 
he ree in your program (including 
e 


charact : roximately 1 byte of 
ccupies app : : 
spaces) O 


memory. 


indbender 9.4 idee 
a the computer print the 12 times 


table. Use a loop. 


Mindbender 9.5 . 
Use the loop to print your name 200 times 


use yor til something else happens. This 


Mindbender 9.6 
Make the com 

print every n 

How long does it take? 


You will find som 
answers to the 
this book. 


e of the possible 
se problems at the end of 


Remember 


1A program can be made to repeat a 


section as many times as you want by 
using a LOOP. 


2. One type of loop is the FOR/NEXT loop. 


3. The 
variable to count } 


FOR/NEXT loop uses a numeric 
1OW Many times it 
repeats the required program 


instructions. This is called the count 
variable. 


- The FOR command is the start of the 
loop. All program lines after the FOR 
and before the NEXT are repeated, 


. The count variable can be omitted after 
the NEXT command. The loop runs 
faster. 
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U loops normally increase the 
6. FOR NENT loops norm 


iu variable by 1 each time the loop 

WU ari 

: round. But yeu can make if go up 

ROCES POU . 

by any other number, bv specifving a 
i ae 

% 7e e.g. FOR pitch =1 TO 255 

STEP size e.g. PO! 

STEP 8 


FOR/NEXT loops can be plac ed inside 
each other. These are called peer 
loops. You must be careful to val 1e 
inner loop with a matching NEXT, 
before vou close the outer loop, e.g. 


1@FORx=1to1®@ - 
20 PRINT ‘outer loop running 
30 FORy=1to3 - 
40 PRINT ‘inner loop running 
50 NEXT y.x 


J > inner loop (y) has been 
Note that the inner loop | | 
closed first in the NEXT statement. If : 
you put the letters the other ey round, 
the program would crash. Try it! 


8 You can USE the 


C 


_ 


10. 


- Another type of lo 


| 
count the NUM ber ef 


of a second that have 
stored the start titne 


Op 
Op 


WHILE/WEND lo 


that a section is re 


Ina line such as 


fe (q 
three 
el; 


IS the 


10 SOUND 1,15,2995 


the numbers mean: 


SOUND channel 


duration, and Volume, 
usually 1 to 7 (see Use 
volume is normally 15 


half volume), Tone ca 
4095 (highest note), a 
from 1 to 255 in 100t 
Chapter 6 of your U 
details. 


» Tone Pep 


v Instruct; 
(loudest) 
n be from 


Where ch 


lod 
anne! j 
Ons), 
100 (7; 
@ to 


§ 
nd duration can be 


hofa second. See 
ser Instructions for 


4.2, Chapter 16 
ss Decisions 


ou make decisions. That is, 
pvery a something. Computers can 


jde to& ns, which is what makes 
you Oke decisio 
a 


is0 a powerful. 


ecision we often say 
hen We aie nines THEN I will act. 
something words IF and THEN as a 
uters be C language. An everyday 
he ne be IF you have permission, 
xam le mis ay go out to play. In BASIC the 
THEN 10 teen means IF something is 
F/T pene do something. 


t program will show you how 
or 

eae statements work. 

JF/ 


1 ae 
10 MO UT"Press 1 or 2” number 
2 


Fnumber=1 THEN PRINT’ Number 
30 IF Nn 


|F number=2 TH EN PRINT’ Number 
40 


2 
50 END 


This program is very simple and should 
i 


y to understand. Line 20 uses INPUT to 
be eas 


is 
;t for a number to be typed. The number 
wa 


ds decisions 


A 


ee re 
Stored in the Variable ‘number’, 


. Lines 30 and 49 Use IF/THEN to make a 


din the variable 


umber is 1 
S tell it to do so!) 
Logical Operators 

In the IF/THEN 
There are other 
following signs, 
they mean. 


statement you used an 
signs you can use. Look at the 
and try to Temember what 


< less than, smaller than 
> greater than. bigger than 
< > not equal to, not the same as 


Signs like these are called logical operators 


because they help the computer work out the 
logic of what you want it to do. 


Random selection 

The IF/THEN statement is used ina lot of 
computer programs, especially in games. You 
can use all of the commands learned so far to 
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make a simple guess-the-number game. Before computer can cl} 
, 100Se e 
~ an 


you type in the program let’s have a look at Try changing t} 
one more command — the command RND. computer nick ra Program to ame fron, 
arger Numbers ake the ty 
RND is used to make the computer pick a What hap = ; 
random number. This is very much like you Colon Al the ee You leave 
pulling a piece of paper out of a bucket of Me 39? Ut the ee 
pieces with numbers written on them. You are Guessing game Mi, 
never sure which number will turn up. You Now type in the next 
may know the lowest and the highest number, than those you have erostam, It ig 
but it would be difficult to predict which uses RND and IF/THEN SO far. a bitlon, 
number will come out of the bucket next. it ‘works’. - Try to wore r8tan 
ut OW 


You call this type of number a ‘random’ 
number — a number picked out entirely by 
chance. To make the Amstrad choose a 
random number, we use the RND(X) 
command, where (X) specifies the range of 
numbers it is to choose from. 


Have a look at the program below. It 
shows how the computer can pick a random 


number. 


19 MODE 1 

20 FOR go=1 TO 10 

30 PRINT INT(RND(1 )*10)+1; 
49 NEXT go 

50 END 


When we ran the program, it printed the 
following numbers 1757649885. The 
numbers chosen when you run the program 
will be different. 


Notice how the limit of 10 is placed after 
the RND command. This means that the 
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mM ** Guess the number ** 
RE 
es MODE 1 


0 do per=INT(RND(1)*20)41 
aonum T ‘Guess-the-Number 
50 de “| have chosen a number” 
60 Pek is between 1 and 29” 
70 PILE GUESS number 
30 W PUT “Your guess is 
90 ae 

uess > number THEN 
IF ANT’Sorry. itis smaller.”’: 
POUND 1,15.15,10 

uess < number THEN 
420 SRINT”’Sorry, itis bigger.’:SOUND 

1 30,1 5,10 
130 phestere “WELL DONE! You took 
140 aod ‘". guesses.” 

RINT’ The number was ":number 

450P R sou=4 TO 200 STEP4: 
si SOUND 2, at Pe EMEXT son 


170 END 


“; guess 


410 


UN the program. If it does not work, 
R ; 
check your typ™s: 


i Ss 
How it aie able to see how the program 
oe ene computer chooses a random 
ara in line 40 and stores it in a memory 
umbe 
oe labelled ‘number’. 


The WHILE/WEND loop makes sure that 
ee does not print the ‘Well done 
= 2 e while you have not guessed 
ees The IF/THEN lines check your 
c ‘ 


Answer ‘j 
‘2OeS' j then Print q clue. The NUMEFC Variable 
i ’ ¢ J , 
fEDS COUNT of how MANY goog hav 
bad. ¥ 80€C8 you have 
7” pie Are some SO INI) Commands on 
cs es 18, 120 and 160. The rising sound at 
© end of the Program ig Produced by a 
OR/NEX* 


that this uses the 
to make the 


humbersg at 
plays Pitch 4, then p; 


pitch of the sound 
sizea differen 
ita random Step size, using 

STEP TSINT(RND(1 )*10)+1 


or any other number in the brackets. 


This is quite an easy program to improve, 
Can you change the colour? How about a 
larger spread of numbers? 


Computer sulks 

So far we have only used nu 
Statements. It is also possibl 
words. Have a look at the program below. This 


is a simple example of an IF/THEN statement 
using a string variable. 


mbers in IF/THEN 
e to use letters or 


10 REM *** Sulker *** 


20 MODE 1 : 
30 WHILE answer $ “YES" AND 
answer $ < “NO” 


40 INPUT “Do you like the Amstrad 
(YES OR NO) “:answer$ 
50 WEND 
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6@ IF answer$=""YES” THEN 
PRINT “You are my friend for life.” 
ELSE PRINT “SeeifI care! 1 shall 
sulk.” 

70 END 


This little program has a few special lines 
in it. Look at lines 30 to 50. What do you see? 


A WHILE/WEND loop is used to make 
sure that the computer only accepts ‘YES’ or 
‘NO’ as an INPUT. This is very useful and 
makes sure that the computer will keep asking 
the question until the person using it types ina 
valid answer. In this program either ‘Yes’ or 
‘No’ would be valid answers. 
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Line 60 is an | 
. ; F/T 
string variable. Notices ao Statem, 
aie marks(‘”), just likes < Word © Usin,, 
word or assign it to q When you pe isig,” 
Vv : u Id, 
Th arlable, © * PRINT a 
ere is i 

have spotted mince SPecial th 
in line 69 — the worst You 
is a BASIC command that Gaia in ELSE pst 
IF/THEN statement. It means t © Use if g Sp 
condition is not true, THEN q hat Ip the : 
ELSE (or different). : *OMEething 


Look at the followin 
IF/THEN ELSE to check en Nee It useg 


19 REM *** Sums test **« 
29 MODE 1 
39 goes=@ 
40 PRINT “ARITHMET| 
5@ WHILE goes <19 aia 
6@ number1=INT(RND(1)* 
5 
7@ number2=INT(RN D(1 reo 
80 PRINT “’Whatis the answer to 


number1; + “:number2 
90 INPUT “Type your answer“. 
answer ‘ 


190 goes=goes+1 

110 1F answer=number1+number2 
THEN PRINT “CORRECT” ELse 
PRINT “WRONG” 

120 PRINT “Press a key for the next 


sum” 
130 GS=INKEYS: IF G$="""THEN 130 
140 WEND 
15@ PRINT “This is the end of the 
test.” 


‘oht-forward program, so you 
«5 is 25 sot llow how it works. Notice 
Th able to 8 s are made in line 119, 


igsing is a Way of counting how 
: 1 
tis ™ 


wh are correct. So make these changes 
ms 


S 
oe program: 
iv sright=0 
ne cauiiher’ +number2 
110 ai PRINT “CORRECT right= 
TH eT ELSE PRINT “WRONG 
ig NT “You scored right; 


0.1 
nder 1 ll needs lots of 


mes instance, stop it printing the 
ourself. n line 120 when the test has 

et in a line to make it display the 

endear of 10 after each answer. 

score 


T: PRINT ‘Your score so far is 
pape outof “goes 


here the line 
annot work out wh 

a hae : look at the back of the book. 
goes, 


ing the screen clear 
about making ea 
ft et sum? Where would you place 
CLS to make it clear the screen? 


You could €ven have the messages 


Our. Look back to Chapter 
'self how it is done, 


Remember 


1. The IF/THEN stat 


ement is used to make 
decisions. 


. IF/THEN is a test. IF the statement is 


true, THEN the rest of the line is acted 
upon. 


. The word ELSE can be used in an 
IF/THEN statement. It makes the 


computer do something different IF the 
condition is NOT true. 


. The usual symbols to use for testing are 
> (greater than), < (less than), =(is 
equal to) and < > (is not equal to). You 
could also use <=(is less than or equal 
to) or >=(is greater than or equal to) 
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5. IF/‘THEN can also be used with AND 7. WHILE/AWENr 
and OR to test whether two things are sure an erie “a 
I iP ies 


N be yc 
vhat heel me 
alls Wanteg n° 
“Ag 


true, e.g. 
- WHILE answers. 
iF bullet=invader position AND fuel AND answers 


@THEN GOSUB.... 
IF answerS =“‘Y"’ OR answerS = “YES” 


THEN GOTO... 


Ph 
No 


; RND chooses a RaNDom number. A 
number must be placed in brackets 
after RND, e.g. RND(20) means choose a 
number between 1 and 20. 
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your a 


say iSh 

jpv O 
gt ‘ the M 
u 0 


Jn 
gore? 


if 


\ 


Tha 


M 
b 


ee the size of which depends 
rid, 


DE you use. 


ODE 
25D 


Chapter 11 


r divides the TV screen into 
te 
pu 


id is 40 blocks across the 
1 ee - Note that the blocks 
locks 


SBN \\ 


ai 
: 
y 


i Using the ~OCATE command 


a 


To tell the 
Printing is ver 
of the block ( 


Computer where to start 

¥ €asy. You give it the POsition 

or rectangle), using Co-ordinates. 
mber (the distance 


Teen), then you give 
the distance 


down the 
screen). 
1234 5678 9 12 ....T0 4g 

1 xX 

2 

3 

4 

5 Y 

6 

7 

8 

9 

12 


To 25 (In MODE 1) 


Have a look at the letters printed ae 
grid to see how this works, using the L 
command: 
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Position x: ree 
position : : 
Position he LOCATE 9,10 
w the numbers are 


ce ho 


bya comma? This is how it 


pid you noti 
placed separated 
should always be done. 

TE command 

llow you to use 
place wot bols on the 
+h the numbers yOu type 
J] not check them. 


10 REM x«* LOCATE Positions *** 

29 MODE 1 

30 INPUT “Th 
ne 

T “The second locate P 


e first locate position 

is ° 

40 INPU osition 
we 

PUT “The symbols oO 

“wordS 


is 
50 IN r words 
are 
69 CLS 
70 LOCATE x: 
80 LOCATE : 2 


PRINT word$ 
3: PRINT “The locate 


y 


position is iG» 
90 G$=INKEYS: IF G$=""" GOTO 99 
100 RUN 


ses commands thal you 
have used before. The three variables X, Y and 
word$ are used in lines 70 and 80. See what 
happens if you try to PRINT wordss on line 23. 


The message in program line 80 will 
write over it. 


This program U 


To continue, you simply press a key. The 
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effect of line 90 is to make tf 
until a key is pressed, You ie Program, 
method in your own pronieae like ty ui 

Ve 

What happens if you try to ; 
LOCATE positions — more than put inva 
more than 25 down the screen? 7 ACO ge 
happens if you try to print on the Nd what 
very bottom of the screen, e.g Lota: 
The problem is caused by thiscus CA TE 309: 
re-appearing at the bottom and eon = 
everything to scroll up a line. This can’ 
Ie 4 


nuisance. 


lic) 
Or 


LOCATE in other modes 

If you use other MODEs, you will fj 

number of columns across and acd that the 

screen are different. Below isa a OWn the 

you remember the screen size for ee 
ren} 


MODEs 


Mode Size 
g 2@ columns acros 
sx 25 line 
1 4@ columns across x 25 ne ii 
2 8@ columns across x 25 lines dew 
n 
FRE(@) 


Would you like to know how many byt 
memory remain unused after you reli 


You can find out the len 
gth of m 
space available at any time by ae. 


PRINT FRE(Q) 


pombe 
Re ross,down enables you to 
ac , 


1. LO -nformation at a particular point 

Phe screen. 

0 give the number of se eda 
First ie screen, then the number o 

“acre wn the screen. The two 


ue rs must be separated with a 
e 
num 


comma. 


4 in the top 


left hand corner of the 


the 

f columns across 

umber 0 

eee will be 1 to 20, 40, or 80 
iin upon the MODE you are 
ene MODE 1 there are 40 columns 
pated i screen, numbered from 1 to 
across 


40. 


- The numbe 


. To find out how m 


d column numbers start at 1, 


. You cannot use u 


r of rows d 
will be numbered frog 
25; depending u 


Own the screen 


are 25 rows 


down the screen, numbered from 1 to 


25. 


uch free space is 
available. 


PRINT FRE(Q) 


pall the memory just 
for your Program or it won’t work, All] 
Programs need ‘head-room’ or 
‘workspace’ in which they store 
variables and strings, and carry out 
calculations, 
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Chapter 14 
your first are 


t things 


sw how to prin 
has come to 


on, the time 
le game! 


Now you knit 
he st ree 


a little complicated, 
rogram that you 
k out with a 


nay ]ook 
the next p 
»— or can’t wor 
»xperiments. 


Although it J 
js nothing in 
‘4 done before 
and a few ¢ 


there 
haven 
little thought 
to design your ow? 


If you wanl to be able 
nding a bit of time 


arcade games, it’s worth spe 
studying how this program works. Almost 
game uses precisely the same 


every arcade 
his simple program. 


principles ast 


iT, VOha 


= 


aaa rs} 

wow ae 

LO ALI at aS 
Gao 
Oo 
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ade game! 


lwo things to remember 
; ee ms 
in. First, you don't need to ty doe Md. 
| a y er | } 
statements, if you don't w na ead 
£ 
O— tt 
1e 


there simply to help you folloy . 
AM IW wht — 
Nat fer, 


does. 


) 
‘Oy 


\¢ 


Secondly, to make it easier to f 
ler to folle 
yw tt 


listing, we have put ina lot of blank 
an linge 4 


must leave these out when typing | 
program. yping in the 


10 REM *** WORDZAP «++ 


3@ MODE 1 


target word *** 
A Pe sad get 


utype in a long 
iT 


U $ 
NPY ord -PRINT word$ 
90! off OCATE 15:1:PR 
S: 


cL ressed? *** 
10° ax* Is any key P 


7 THEN xX=X+1 TF 
ate 0 35:GOTO 2090: 
t 


: Arrow ; 
Tyee x=1:GOTO 200: REM 
Ziv 


vw 
RIKEY 4700 THEN GOSUE 
°° 740 - 
em *** Print gun 
R 
430 vayer 

:PRINT 
E x,24:P Ss 

OCAT © REM Check key pres 
200" To 140: 
106 


again 
720 END 


REM «** Fire bullet HHH 
240 
EP-1 
OR bullet=25 TO 1 STEP a 
jes CATE X+1 wbullet:PR . 
- YOCATE X+1,bullet: PRINT 
28 


590 NEXT:RETURN 


in, say, your name 
the game, type In : 
. meee asked for a long word. Then : 
eLEFT and RIGHT ARROW keys to mov 
e 


ihe ‘gun’. Press the SPACEBAR to fire the gun. 


Tand ¢| 
yOu Can see that MODE” - Previo 
0 


characters Wide, by 25 lines do 


of the 27 Colours aya; 
Chapter 8). Ne 


~ Sets the init; ] 
@PPproximately half-w nea 2 


later Why not Precise] 


Line 99 — Uses INPUT to sto 
until you have ty 


P the pr 
yped Program 
used asa target, 


ina word, which will be 


Line 100 ~— Clears the screen and prints the 
target word LOCATED at 15,1. Thi 
column 15 acros 
line (1). 


change the 1 toa number, say 10, and see what 
happens. If you want to use only short words 


as targets, you also could try changing the 15 
to, say, 16 or 17, 


Using INKEY{(n) 

Line 140 — is really 3 or 4 program lines rolled 
into one! First, it uses INKEY(1)=0 to check 
whether the RIGHT ARROW key has been - 
pressed. If so, it adds 1 to the previous value of X. 
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When the game starts, the value ol xX is i 
(line 40), Now it becomes 1g4 b= If. Nox! {ime 
Nis already 19, 80 if the RI WW 
vd, X becomes 1g4+1= 
I be lo move the 
rach Lime the 


round, 
ARROW is still presse 
29, ete. The effectol this w 
gun one position to the right ¢ 


arrow key ts pressed. 


right 
line checks whether 
vd 35. I it has, the 
truction “Tl 1EN X =35' re-sels IL to the 

e of 35. It can never grow to 36, 
id take it off the right 

on, wilb disastrous 


The next parl of the 
the value of X has reach ¢ 
ins 
maximum valu 
37, 38, elc which wou 
hand side of the scre¢ 
results! 


The reason thal a maximum value of 35 


and not 40 as you might 
r the width of the gun 


5 characters wide. 


has been used ( 
expect), is to allow fo 
_ which is effectively 


To check the effect, replace line 140 with 
140 IF INKEY(1)=0 THEN X=X+1 : 
GOTO 200 


then be sure to put the line back to our way 


again! 


Line 150 — checks whether the left arrow 
key has been pressed using INKEY(8)=9. 
There is an explanation of what these 
INKEY numbers mean in Chapter 8, page 20 
of your User Instructions. 


IF the left arrow ke 
y has been pressed 
THEN the value of X is decreased by one. The 
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effectol this will be to move the 


to the left. §un OnG 5, 


lite, 


Ags with line 140, it is necessarp 
the gun moving off the side of fe lo Preye, 
this time, the left side. The lowest SCreEn, bp 
number fora LOCATE statement eeu 
we stop X becoming 0, -1, —2, etc : ONE (1), 
that I’ X is less than (~~) one, Tl TEN mee 
HY) Xx 


Line 160 — yet another INKEY gt, 

‘hig time we check to see if the SPACR nt 
has been pressed, so we use INKEY ene 
Appendix IL, page 16, of your Ubep Aa Which 
tells you is the number for the space 
were to change the number inside ee If yoy 
to, say, (53) — which is the INKEY nu ° brackets 
the letter ‘F’ key, the bullet would fi mber fop 
when you press the ‘F” key. re only 


As you can see, though 

command looks ee nee 

extremely easy to use. It has the ae y 

advantage over INPUT, that it pier 

program if no key is pressed, and yo a ne 

have to press <ENTER>. This nn a 

really useful command in Fastening : , 
ames! 


How the gun moves! 

Line 200 — prints one k 

Line ! eyboard symb i 
space on each side. The symbol is an cle ; 
pointing arrow head sign. You can fi di ae 
beside the CLR key. “ 


Of course, you co 

Se, uld use any other 
characters, if you think they might look a bi 
more like a gun! ~ 


k space on either side of the 

4 blan gramming trick that might 
ynnins Pt Sundays to work oul for 
is ae one like most really bright 

ie i ‘simple! 

sells Gautifully er 

"08 is tit does — and you really must 
j 1 5e8 cane program again, after 
TO” RUNt spaces. Don’t bother to fire 
Dy ag the ne it right and left... do it 
h a reading on. 

. 
righ hat happens? You get a trail 
a te now you know what the 
d bits of sens out any bits of the gun 

fol do- they s X position by printing a 
the end of the last position. 


0 

ce jou 
sp2 the prev} i 
fro space OVE 


d by now, we 
; obably guesse 
g you v pvaltotin the X value in the 
ove the a statement. When the program 
LOCATE (line 40) which is roughly 
X= 


ing for the 
starts: across the screen, allowing 
y 
palfwa 


ht wonder why we didn’t set the 
a down, for example, on the 

uneven oe line 31. If you try it, you'll see 
bottom line un into rather annoying scrolling 

r 

why — aes may also discover a minor . 
effects: -f you set it on line 30, but you can 

roblem i ois one if you set the siciancap 
sean left to 1 less than the present 35 
movem 


(line 140). 


You mi 


ier, you could 
make the game easier 
vate the second number in the LOCATE to, 


Say 25 wl . 

49, Whic ; 
ihn peat i h Would Print the ere 
ofthe EN and Nearer to the tap Migher up 
© Ways that SKILI le “get. Thig is ong 
Arcade games “VEls Cg 5 


Using aS 


" UBROUTINE 

INE 260 ~ is the start of 
: Saks * Start of a Subroutine 
comes into Operation the moment ites 
the SPACEBAR. YOU presg 


A subroutine iss 


Program within a program, 


Briefly, the com 
subroutine by theG 
160). This is simj]- 
GOing toa SUBrouti 
remember where itcame f i 
and RETURN there ease ae 
instructions in the sub 
RETURN instruction. 


When you press the SPACEBAR, the 
computer is sent to the subroutine which fires 
the bullet. Then it RETURNSs to the main 
Program to print the gun again. 


You would normally only use a 


subroutine (rather than GOTO) 


, when you 
want tore 


peat the same set of commands at 
several different places in the program. So in 
this particular case, where we are only going 
to the routine from one point in the program 
(line 160) we could just as easily have used 
GOTO, instead of a GOSUB. We chose to use a 
subroutine here, mainly to introduce you to 
the methods. 
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l 
iring the oe 2XT loop to coun 
Line? ae Sos STEP-1 command 
‘ , number by 1; each jena 
Pe ea coun’. If you don't like the rae 
ae of the gun disappears ae are 
peed change the number from 2 ; 


Line 270 — prints an exclamation png 
sent a bullet. If you prefer, you co 
7 aan i snstead. Note that the bullet is 
sanied one posi e right of X. ae 
makes it appear 


the gun. 


tion to th 
to come out of the cen 


Line 280 — prints a blank space over the 
previous bullet position to rub it out. If you 
leave this line out, you will get a stream O 


bullets. Try it and see. 


Line 290 — uses NEXT to check whether 
the FOR/NEXT loop has finished. In effect, it 
asks ‘have I finished counting down from 25 to 
1?’ If it hasn’t (i.e., the numeric variable ‘bullet’ 
is still greater than zero), NEXT sends the 
computer back to line 260 which reduces the 
value of bullet by one again. 
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When the value of b 
the computer moveg 9 
statement on the line, me Wing ™ ft 
This sends it back to Were is Rye 
line 160, immediately afte, 
instruction), so that it can ¢ 
next instruction in the maj 


f 

it ca e be 
r ‘ 

the Gogy,, "lie, 


arr 
Ais With ¢} 
n Program le 


Adding colour 

From what you learned in Ch 

remember that the mode we are ,,.,’ YOU m, 

1) allows us tou USing (Mop! 
ja se a total of 4 colo Mop 

you have a colour monitor, yoy Pe 0, if 

stick to boring old black and wher aVe tg 


apter g. 


The colours available in MODR 1 
ate: 


Co/our 


Blue Pen/Pape, 
Bright Yellow 

Bright Cyan 1 
Bright Red 


Let's stick to the yellow PEN 
the moment and keep the target ( 
yellow. Just add this line: 


Colour for 
words) 


95 PEN 1: REM yellow 


How do you think we can P 
in red? Easy, just find out which Ine poe 
gun, then add the appropriate colour — 
command (this time 3 for red) immediatel 
before it. You can see from the REM lines th t 
the gun is printed after line 189 — Ah! Ther ; 
is at line 200... So now add: i 


en 3: REM red 
5P seful those nicely spaced 
38 panne can be when it comes to 
w Vi stateme 
No i‘ 


;ons to a program. 
gut R g alteration 
kin 


ma let's change the bullet to cyan: 
‘wally 
Fine 


EN 2: REM white 
il in, to check that you are 
rogram agai far 
p lours sO . 
RUN with 
y 


; ight yellow paper? 
How a a laprt oe 
ooner sat rding cc cae ais een the 

MpER 1 aeeaction just ce 

dd ne ee — say, at line 93: 

targe - 


S5PENQ- REM blue 


That should do it! If you find that the cyan 
bullets don’t show 


UP very well on your 
screen, change them to red by typing: 


255 PEN 3:REM red 
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an make lines on 
th different 
de by 


e computers Cc 
fill areas in W1 
| the pictures ma 


Most hom 
the screen. and 
colours. We cal 
computers graphics. 


oduce very good 
though some of the commands are 
very difficult to use. Already you have made 
your own characters, but these are only a 
small part of the Amstrad’s graphics 
capabilities. MODEs 9,1, and 2 are graphics 
modes. That means you can draw lines and 
block in areas of colour using these 


MODEs. 


The Amstrad can pr 
graphics, al 


Graphics grid 

The graphics screen gri 
grid which you have been usin 
and symbols on. 


d is different to the text 
g to print letters 


Look at the screen plan below. This is 
Mode 2 graphics screen plan. Can you see that 
there are 640 units along the top and bottom 
and 400 units up the sides? Another important 
difference is that the 0,0 position is at the 
bottom of the screen, not the top as it was 
when you used the LOCATE command 
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Graphics screen 


0 
640 


Choosing a graphics MODE 

The Amstrad uses up a lot of its memory j 
graphics modes. So the finer the lines : . 
want to be able to draw, the more ait i 
required. ia 


For drawing really fine lines MO 
best, MODE 1 is perhaps the best for a 
patterns with lines. In MODE 1 you can ‘ale 
use 4 colours; in MODE 2 you have only a 
colours available, but you have more memory 
to use. MODE 0 draws with thicker lines but 
allows you to use 16 of the 27 colours. 


ne? ad a little bit about 

a ou will find this chapter quite 
fy? qinates: to note is that the start of the 

a t ree the graphics screen is at the 
ae a nd corner. Look at the screen 
00 0 left endix VI of your Amstrad User 
von. APE" here are much more detailed 
rasttucl ae It is worth getting this out and 


en 
oe a Jook. 


to get the computer to draw a line 


Now; do three things. 


we have " 
graphics MODE e.g. MODE 1. 

° computer where to DRAW from. 

puter where to DRAW to. 


i enn 
Tell t 
: Tell the com 


the commands MOVE and DRAW to 
We use lace and to draw toa place on the 
move got picture below will help you to 
screen nd how to use DRAW command. 
unders a command we place two numbers 
After yer by a comma. The numbers tell the 
separator where to DRAW to on the screen. 
awe following program, RUN it and look 


at the diagram below. 


10 REM *** Triangle *** 

20 MODE 1:REM any MODE @ to 2 

30 DRAW 0,409,1:REM straight line 
from bottom left to top left in 
yellow colour 

40 DRAW 649,0,3:REM straight line 
from top left to bottom right in 
red colour 


50 DRAW 9,0,2:REM straight line from 


The Amstrad 
the lower half of t 


should draw a triangle in 
he screen. 


The other useful command is MOVE. The 
MOVE command will let you move the 


graphic cursor to any point on the screen. 


Drawing pictures 

You can see that it is very easy to build up 
interesting drawings using the MOVE and 
DRAW commands. The following program 
draws a simple house. Try to follow where the 
computer is drawing to on the screen plan in 
your Amstrad User Instructions. If you 
understand how the co-ordinates are being 
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used, try to write your own pro 


gram that will 


draw a picture. 
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KRE 


10 REM *** Drawa house 
20 MODE 1 

30 REM Draw a block 
40 MOVE 150,100 

50 DRAW 150,300 
69 DRAW 450,300 
70 DRAW 450,100 

80 DRAW 150,100 
90 REM Draw roof 
100 MOVE 150,300 
110 DRAW 300,400 
120 DRAW 450,300 
130 REM Draw a door 
149 MOVE 200,100 
150 DRAW 200,200 
160 DRAW 259,200 


170 DRAW 250,190 
180 DRAW 200,100 


Now you Carry on with the Progra 
Make the computer draw a couple of m, 
windows. It is easier if your first dray it 
graph paper or a screen plan. mm 
Saving space 
You may be thinking that a lot of program, 
lines will be used up if the drawing jg 
complicated. This can be avoided by writin 
several instructions on the same program ne 
Don’t forget that each instruction must be 


separated by a full colon (:). 


The short program below uses the colon 
method, it saves space and computer memory, 


10 MODE 1 

20 DRAW 649,400:MOVE 
640,0:DRAW 0,400: 
MOVE 320,0:DRAW 320,400: 
MOVE 0,200:DRAW 649, 


200 


Try the program. If you miss out the colon 
(:), the computer may become confused and 
give you an ERROR message. There are other 
ways of drawing things on the screen but they 
use commands that are too complicated for 


beginners. 


Patterns 

The next three programs are a bit more 
complicated than those you have seen so far. 
They use MOVE and DRAW to make patterns. 


. d see what they do. Number 3, 
tpem in an ogram that helps you draw 
Te wIT. eee read the instructions 
D S on t 


NHK 


REM *x** Pattern 


XTn 
“ NOR n-X TO Z STEP-40 


100 MOVE n.Y:DRAW Z,n 
NEXT n 

130 NEXT go 

149 GOTO 140 


A program that uses straight lines to make 
ee may have done the same sort of 
urves! 
hig with a pencil and ruler. 


Gunshot! 
The next program is rather different... 


10 *** Gunshot *** 
20 MODE 1 


30 INK 1,0,26:SPEED INK aa 
49 FOR n=1 TO 60 


70 NEX 


99 SOUND 1,300,40,5,7.1 2,.2:NEXT S 
100 FOR we-1 TO 500:NExT Ww 
1TIOIFS 


-O THEN GOTO 59 


Well, almost like a bulle 
Window! You should be able 
of the program that makes th 
changes the colour w 
changes white back to white. What effect do 
you think this has? Try missing out the line. 


DRAW it! 
Our next p 


rogram enables you to DRAW on 
the screen. 


Use the cursor control keys (the four 
arrow keys) to DRAW. If you hold down the 
SPACE BAR while drawing, the line will 
disappear. You can press two keys at once to 
move diagonally, Try not to go off the edge of 
the screen or you may not find your way back 
onto it! 

Remember that you do not have to 
include the REM statements, they are to help 
you understand the program. 


10 REM *** Draw it *** 

20 MODE 1 

. X=320:y=200:REM Centre of screen 

49 MOVE x,y:REM Start at centre of 
screen | 

50 IF INKEY(@)=@ THEN Y=Y+1:REM 
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Move up | 
60 IF INKEY(2)=0 THEN Y=Y+1 -REM 
Move down 
7QO IF INKEY(8) 


=9 THEN X=X+1 “REM 


Move left 
80 IF INKEY(1)=@ THEN X=X+1 ‘REM 


Move right 
90 IF INKEY(47) 
C=1:REM 

Space bar alt 
100 PLOT xy.c:REM Plot lin 
C to position X,Y 
119 GOTO 50 


-0 THEN C=3 ELSE 


ers colour to red 
ein colour 


How it works 
The drawing program uses INKEY to test for a 


particular key being pressed. The INKEY key 
numbers are given in your User Instructions 


on Appendix III, page 16. 


PLOT X,Y,C is only another way of telling 
the computer to draw — ‘X’ and ‘Y’ are 
variables, controlling the position on the 
screen. Can you see where X and Y are 
changed? ‘C’ is a variable that changes the 
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colour of the line from blue tg r 
hold down the SPACEBAR (key 
is drawn in red. 


ad, When yo, 
y 47), This lin, 


To move round the screen, you ¢ 
centre, where ‘X’=320 and ‘Y’=299 at the 
the RIGHT ARROW key (key 1) lin U preg, 
makes the variable ‘X’ become 329 80 
a line is drawn one small square to : = 321, g, 
line 100. If you continue to press a ke © Might by 
‘y’ becomes smaller or larger. This = Xan 
precisely the same methods as you ite 
control the gun position in the previgys to 
chapters. 


Changing colours 

So far, we have only used yellow and req 
colours for our drawings. It is possible to as 
change the colour of the lines but rememb 
that only MODE @ allows you to use 16 " 
colours. You will use the command to chan 
graphics colours in the next chapter, 


ember 


rem 


DE 
1. ee S 


fines Dut 
i 


DE 2 gives the finest 
ren colours, MODE g 
lines but uses all 16 


hics screen is on a grid 649 


9, The B00 down. 


atrre : eae 
and to move to a position on 
The eae is MOVE x,y, where x ae y 
the aes telling the computer the 
oe re to. 
oT prdinates to move 
co- 


1,2 are used for drawing lines 
S 0, ’ 


3. More than one Instruction can be 


Placed in a Program line, Provided each 
instruction ig Separated by a colon (:) 


6. INKEY(number) Is used to test fora 
Particular key being Pressed. Details 
are on Appendix III, Page 16, of the 
Amstrad Usep Instructions. 
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baa Appendix 


ams are very 


ogr 
een in this 


ou have § 
ou must take 
ke. Finding 


The following two pr 
Jong, compared to those ¥ 
book. When ty ping them iny 
to make a mista 
ake a long time if you are not 
used to looking for ‘bugs’ in 4 program. It 


might be best if you type in part of the 
program al a time, SAVE it, then LOAD it later 


so you can add more of the listing. In this way 
you will not become too bored with typing 


them out. 


extra care not 
mistakes can t 


The first program is based upon the board 


nd. You have to guess the 
sequence of coloured pegs under a cover at the 
iop of the games board. The computer displays 
a board plus your attempts to discover the 
colour code. Full use of colour is made in this 
program; the game is very attractive and fun to 
play. You will find full instructions in the 
program code. 


game, Mastermi 


Masterbrain 


19 REM *** Masterbrain *** 
29 DIM bS(19),y(1@),z(19), 
c(5),g(4),r(4),c%(4), colour(4) 


80 


30 MODE 1 
40 GOSUB 1490:G 
GOSUB 1680 OSUB 1649 
50 MOVE 255, 1%: D 
60 GOSUB 1540 | RAW 320, 14 
70 CLS: b%=4: w%= | 
4 =5: f%=0- 
80 GOSUB 979: oes all 
90 c(@)=4 
100 FOR n=1 TO 4 
110 c(n)=INT(6*RND 
(1 
120 IF c(n)=6 THEN Ae | 
130 NEXT n ~/ 
140 FORn=1TO4 
15@ x=c(n) 
160 GOSUB 750 
17@ c(n)=x 
180 NEXT n 
190 P$=""" 
200 FOR x1=1TO4 
210 P$=P$+CHR§(c(x1)) 
220 NEXT x1 
230 PEN 11: PRINT 
“MASTERBRAIN”: 
oo -PEN 4: 
40 FOR P=1 TO 1 
250 PEN4 : 
260 oe “‘GUESS: ”: count=90: 


-orcount=1 TO 4 

970 FOr INKEYS: IF cS="Y" OR cg- 

280 Cy OR c$=""R" OR c$="G" OR 
.g-"'B OR cCS="P" THEN 299 

ELSE GOTO 280 

PEN 3: q$=g$+c$ 

0 NEXT count 

3 9 SOUND 1,30.10.15: SOUND 

330 GOSUB "000 

a GOSUB 1270 

350 bS (P)=gS 

360 GOSUB 510 


290 
300 


370 IF b=4 THEN GOSUB 919; #47. 


GOSUB 1110: GOSUB 1329. 
GOSUB 1439 
380 GOSUB 600 
390 PAPER 1: LOCATE 1, b%41- 
PRINT: TAG: PLOT (6*64), 
378—-(b%* 16), 4: PRINT 
TAGOFF 
400 y(P)=b | 
420 TAG: PLOT (6*64), 
378-(W%* 16), 1: PRINT: 
STRINGS (w,CHR$(224)):: 
TAGOFF: b%=b%+2: w%=w%+2: 
PEN 3 
430 z(P)=w 
449 NEXT p | 
450 CLS: LOCATE 1,10: PRINT 
“SORRY "3 LOCATE 1,12: 
PRINT “YOU “: LOCATE 
1,14: PRINT “HAVE “i 
LOCATE 1,16: PRINT “LOST!” 
460 PEN 3: PRINT “THE CODE 


WAS is 
980 1%-7: me 


49%) FOR t~4 0) fan ; 
sin CNET 
500 REM Black p,,. 948 1430 
SIOFOR 1-1 TO 4. 
920 9(x1)=ASC Iming 
530 NEXT x] : 

540 b- 4) 

550 FOR k-1 To 4 
560 IF gq(k c i-eae 
570 by ey (k) THEN 59 
580 NEXT 

590 REM White Pegs 

609 FOR x1-1 19 4 
6101(x1)=asc i la. oa 
620 NEXT x4 eee 
630 w=9 

649 FOR i=1 To 4 

650 FOR j=1 T04 

669 IF gli) +(j) THEN 710 
680 w=w+1 
690 r(j)=9 
70® GOTO 720 

719 NEXT j 

720 NEXT j 

725 IF b> w THEN GOTO 740 
730 w=w-b 

740 RETURN 

750 REM change 

760 1Fx<>1THEN 790 

770 x=82 

780 RETURN 

790 IFx< >2 THEN 810 

800 x=71: RETURN 


‘gS, «1, 1}) 
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82 


N 
F +1; PRINT 
sPc(12) 
940 PEN 14: LOCATE 
“YOU WIN” 
950 PRINT “code: 


1,5: PRINT 


“: PEN 15: PRINT 


p$ 
960 RETURN 
970 REM Graphics 
980 CLS | 
990 FOR !%=378 TO 502 STEP = i 
1000 MOVE !%.0: DRAW 1%,320,5 
1010 NEXT !% 
1020 FOR 1%=28 TO 34@ STEP 32 
1030 MOVE 385, |%: DRAW 492, 1%,5 
1040 NEXT 
1069 REM More graphics 
1070 TAG: PLOT 425,345,6: PRINT 
“3 TAGOFF 
1190 RETURN 
1110 REM aski 
1120 IF #%=1 THEN g$=p$ 
1130 FOR x1=1 TO4 
1149 COLOUR (x1)=ASC (MIDS 
(g$,x1,1)) 
1150 NEXT x1 
1160 FOR x1=1 TO4 


1180 NEXT x1 

1199 RETURN 

1200 REM Make colours 

1210 IF c%=89 THEN c%-4. 

1220 IF c%=82 THEN cya CE TURN 

1230 IF c%=80 THEN c% 7S LURN 

1240 IF c%=87 THEN c% 4. pee URN 

1250 IF c%=71 THEN c%=4 SRETURN 

1260 IF c%=66 THEN c%=8. pe URN 

1270 REM Display RN 

1280 FOR x1=1T04 

1290 TAG: PEN (x1): PLOT (x4 
*28,378-(b%*1 ay — 
PINS;: TAGOFF 

1300 NEXT x1: TAGOFF 

1319 RETURN 

1320 REM Winner 

1330 LOCATE 16,2: PRINT Spr, 

__ LOCATE 16,3: itd peas 
1340 FOR n=512 TO 640 STEp Ae 
1350 MOVE n, 488: DRAW pn. 31 
1360 NEXT n ie 
1370 MOVE 512,448: DF . 
1380 FOR s%=30 TO 208 oo 
____ SOUND 3, s%,20,15: N EXT ’ 
1390 FOR x1=1T04 - 
1400 bie MOVE (x1+15)*32 

510-(2*16): PRINT PINS: 
ea ): PRINT PINS:: 


NT 


1410 NEXT x1 


1420 RETURN 
1430 REM Again 
1440 PEN 4 
1450 LOCATE 1,28: PRINT 
“ ANOTHER TRY?” 
1460 aS=INKEYS: IF a$ < >"Y” AND 


~"N" THEN 1469 
gif aS="y" THEN 70 : 
(AT SEN INT (RND(1} 15)+1: PAPER 
4480 iNT (RND(1)*15)+1: PRINT 
? GOODBYE ": GOTO 1489 
[MM Intro 

1490 neve 640,1: REM Plot 

ta PAPER 4:: CLS 

ee RETURN 

1330 REM Codes 

1540 PAPER 1 

550 SOUND 1,510,120,14 

1620 RETURN 

1640 REM CHARs 

1650 SYMBOL AFTER 224. SYMBOL 

224,0,0,24,60,24.0,0,9- SYMBOL 
225,230,255,0,0,0,0,24 24. 
SYMBOL 226,801 26,23,226, 
126,60,24,24 

1660 PINS=CHR$ (225)4cH R$ 
(8)+CHRS(10)+CHRS (226) 

1670 RETURN 

1680 REM INSTRUCT 

1690 CLS: PEN 2: LOCATE 13.1: 
PRINT “MASTERBRAIN”: 

PEN 3 

1700 PRINT: PRINT “This game is 
similar to the board game’: 
PRINT “MASTERMIND”: PRINT 
“You have to guess the correct 
order’’;: PRINT “of the coloured 
pegs under the cover at the top of 
the board” 

1710 PRINT: PRINT “You have to 
input the guess as a CAPITAL 
letter’: PRINT: PRINT “eg. . 
RRBW (red, red, blue, white)”: 


PRINT 


a Correct col 


place’. PRINT: PRINT “A 
YELLO 


Will not use bla 
Coloured pegs.” 
PRINT: PRINT: PRINT 


Pressa letter to Start” 
1760 a$=INKEY$: IF aga" THEN 
1760 


1750 


1770 MODE 0:CLS 
1780 RETURN 


Tower of Hanoi 


This game is also a 
thought. It is based upo 
played with Tings on th 
to do is to move the tower of rings from one 
beg to another. Sounds easy? You will find that 
to complete the Tower of Hanoi in under 
seventy moves is very difficult. A colourful 
game that will test your powers of 
Concentration and intelligence to the full. 


game of strategy and 
nan ancient game 
Tee pegs. All you have 


Tower of Hanoi 


10 REM *** TOWER OF HANO| *** 

20 REM *** A game of logic *** 

30 ENV 1,120,2,30 

60 MODE @: GOSUB 1240: FOR n=1 
TO 300: NEXT 
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: ~ ays LOCATE 1,18: 
NI |NSTRUCTIONS 
POCATE 1.12: PRINT “(¥ 

NKEYS: WEND: IF 


N)?": re 
g$="n"” OR gS="N THEN 120 


110 MODE 1:GOSUB 840 

111 PAPER 10: CLS 

120 MODE ® 

121 PAPER 10: CLS 

13@ LOCATE 1,20: PRINT STRINGS 
(20, CHRS (225)) 


140 PEN 12 


LOCATE 9,21: PRINT “2”: 
LOCATE 15,21: PRINT “3” 

160 GOSUB 1460 

170 FOR z=7 TO 1 STEP-1 

1 80 a(1 z)=1 

190 a(2,z)=z 

200 a(3,z)=1 

210 NEXT z 

220 c=1:z=0 

230 z=z+1 

250 y=8 

260 WHILE y< >1: y=y-1 

270 IF a$ (a(z,y))=aS(6) THEN PEN 3 

280 IF a$ (a(z,y))=a$(7) THEN PEN 8 

290 IF a$ (a(z,y))=a$(1) THEN PEN 4 

300 IF a$ (a(z,y))=a$(2) THEN PEN 3 

se a a$ (a(z,y))=a$(3) THEN PEN 1 

a F a$ (a(z,y))=a$(4) THEN PEN @ 
a (a(z,y))=a$(5) THEN PEN 


340 LOCATE z*6-5 

>», Y+1 
a$(a(z,y)) ” 
350 WEND 
3690 1Fz 3 THEN 249 
370PEN11 
380 LOCATE 10,6: PRINT “io 

OVE: 


de PRINT 


:C 
390 IF a(1,2)=2 OR a(3,2)~2 + 


760 nen 
Ape LOE NTE UEP BINT SP Giag, 
410 py iadericiellg 1,4: PRINT 
id Ag “PRINT 
ik tepiyhl LOCATE 1,6: PRINT 
A440 is LOCATE 1,4: PRINT j; 


45@ PRINT: PEN 1 
460 INPUT k: LOCATE 1.6: 

epein E 1,6: PRINT 
470 PEN 3 
480 LOCATE 1,4: PRINT ;-” 
. | hee! ae INT J; TO 
490 SOUND 1,100,5,15 
500 IF j>3 ORj<1 ORKS30Rke1 
’ HEN GOSUB 1550: GOTO a 
510 PEN 12: GOES=GOES+1 - 
520 IF k=j THEN 750 
530 FOR I=1 TO 50: NE 
540 d=0 — 
55@ d=d+1 
560 IF a(j.d)=1 THEN € 

.d)=1 THEN 600 

570 p=d seis 
590 IF p=d THEN d=7: GOTO 620 
600 IF d<7 THEN 550 7 


0 GOSUB 1558: GOTO ADD 

1 

6 g d=0 

20 d-d+1 ; _ 

1F a(k,d)> 1THENG 7@ 

O50 | a(k.d) qQTUHEN GOSUR 1 


60 iF a(k,d) 171 THEN 680 

680 d=d-—1 

690 a(k,d)=a(j.p) 

700 alj.P)=1 

710 c=c+T 

720 £1=0 

730 d=7 

740 z=0: GOTO 249 

750 REM Come here at end of 

760 FOR s=19TO 250STEp 4 

770 SOUND 1,s,5,15: SOUND 
3.5,5,15 

780 NEXT 

799 PEN 1 

800 LOCATE 1,22: PRINT “You have 
completed’’;: PRINT “the 
TOWER” 

810 FOR I=1 TO 400: NEXT: g$="" 

829 GOSUB 950 

830 IF gS=""Y" OR gS="y”" THEN 
CLEAR: GOTO 12@ ELSE 
GOSUB 10790: END 

849 REM Instructions 

850 PEN 3:CLS 

870 b$=rat$+’’ TOWER OF HANOI” 

880 RESTORE 1220 

8990 FOR sen=1 TO 6 

9900 READ sS&(sen),a 

919 LOCATE 1,a: PRINT s$(sen) 

929 NEXT sen 


game 


@ 


F I 
GOTO AO IO. 


", GOF ore o0es’’:: 
om fi RINT “to build the poet 

/ N1:1- GOES. 66 THEN 
LOCATE 1.8:PRINT “ 
BRILLIANT SCOREm” 
IF GOES ‘90 THEN LOCATE 
iu 1 8: PRINT Try harder kid!” 
IF GOES ‘66 AND GOES ~9@ 


THEN LOCATE 1,8: PRINT “© K: 
An average score” 

1020 WHILE g$- >"Y" AND 
9$< >“y" AND g$<= —“n” AND 
g$— > "'N” 

1030 te 1,20: PRINT “Another 
game?": PRINT “ a 

1040 g$=I NKEYS$ la 

1950 WEND 

1960 RETURN 

1070 REM Bye 

19890 CLS 

10990 FOR b=1 TO 39 

1109 PRINT “Good Bye”: 

1110 IF count> 15 THEN PRINT 

1120 NEXT b 

1130 END 

1220 DATA Your task is to transfer the 
rings, 6, one by one onto one of 
the other, 8, pegs. You cannot 
place a bigger ring, 19, ona 
smaller one and the computer, 
12, will tell you so if you try it, 14 


1000 


85 


86 


1230 DATA Press any letter to sta rt 

the game. 2¢ 
240 REM Title an 

: oe title$= T OWER OF HANOL: 
CLS: c=3 

1270 FOR p=1 

1280 PEN c: c=c+ 

1290 LOCATE pt 
(title$.p.1) . 

1300 SOUND 1,p*8.4.15 

1310 FOR I=1 TO 91: NEXT 

1320 NEXT 

4330 RETURN 

1340 REM Char 

1350 SYMBOL AFTER 225 

1360 SYMBOL 225,255,255,255, 
255,0,0,0,0 

1370 SYMBOL 226,60,60,60,60,69, 
60,60,60 

1380 SYMBOL 227,255,255,255, 
255,255,255,255,0 

1390 SYMBOL 228,240,240,240, 
240,240,240,240,0 

1400 SYMBOL 229,15,15,15,15,15, 
15,15,0 

1410SYMBOL 230,15,15,15,15,1 5, 
15,15,15 

1420SYMBOL 231,63,63,63,63,63, 
63,63,0 

1430 SYMBOL 232,192,192,192, 

"_ 192,192,192,192,0 
1440SYMBOL 240,48,91,255,63,4, 


TOLEN (titleS) 
1:1Fe>15 THEN c=3 
2.6:PRI NT MIDS 


8,48:SYMBOL 241, 
feast : ATA. 
253,249,33,16,8: MELLO 
(240)+CHRS (241) — =CHRg 
1450 RETURN 
1460 REM Rings 
1470 Sp$="" ":a$(1)=sps 
— CHRS (230}4STRINGS 
1480 a$(2)=sp$+sp$+CHRg (3 
— (231)+CHR$ (232) — 
1490 a$(3)=sp$+sp$+CHRS 
— (227)+CHR$ (228) 
1500 a$(4)=sp$+CHR$§ (2 
pe froth RS oan S}+CHRS 
1510 a$S(5)=sp$+STRINGS (2 - 
ae (227))+CHR$ (228) $13, CHRS 
520 a$(6)=CHRS$ (229)+s7 
Pe opin dM ieee 
530 a$(7)=STRINGS (5 CHRe 
_ +CHR$ (228) eenren ites 
1540 RETURN 
1550 REM invalid 
1560 FOR L=1 TO 100: NEx 
1570 LOCATE 1,4: PRI NT Pes 
__CANNOTDOTHATI” 
— SOUND 1,3,25,15 _ 
1590 FOR s%=1 70TO oe 
hit s%=170 TO 6@ STEP _i1c 
1600 SOUND 1,s%,1,1 a 
1615 LOCATE 1,4: PRINT” 


‘Sp$) 


1620 RETURN 


This seC 
gl the com ight find useful. Some 
ae clude a program line or evena 
am to help you understand what 
y 


reye i 
me janations in 


ex 
snort pr 


AUTO 


ooo? 


CHAIN 


CHRS 


omm 


tion of the book contains a list of 
ey used in the book, plus a few 


tells the computer to 
AUTOmatically print line 
numbers. AUTO on its own starts 
at 10 and goes up in tens. AUTO 
200,20 starts at line 200 and goes 
up in steps of 20. Press ESCAPE 
to stop AUTO renumbering. 


AUTO <ENTER> 


this command LOADs a program 
from cassette, then RUNs it. 
CHAIN” chains the next program 
on the tape, or the name of the 
program can be put inside the 
quote marks, e.g. 


CHAIN’ GUNSHOT” 
<ENTER> 


pronounced ‘character string’ is 


CLS 


CURSOR 


DRAW 


gy Glossary of COmmands 


used to PRINT a Symbol, or 
character on the screen, oe. 
CHRS(97) is the letter A, PRINT 
CHRS(1 3) is the same as pressing 
the ENTER key. CHRS$ can also 
be used to print user-defined 
characters 


10 PRINT CHRS(97) 


CLears the Screen and sends 


the cursor back to the top of the 
screen, e.g. 


50 CLS 


is not a command, but the 
coloured square that tells you 
where the computer is to PRINT 
next on the screen. 


draws a line on the screen from 
the last point visited to the point 
given after the command. 


10 MODE1 
20 WHILE x=@ AND y= 
30 x=INT (RND(1)*400+1): 
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ELSE 


END 


FOR: .. 


NEXT 


GOTO 
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y=INT(RND(1)*640+1) 
4Q DRAW xy 
50 WEND 


is used in an IF/THEN statement. 
IF the IF/THEN statement is 
UNTRUE the information after 
the ELSE will be used by the 
computer. 


10 1F n=@ THEN PRINT Do not 
use zero” ELSE PRINT’’That 


was O.K.” 


is used to tell the computer that 
the program is to END and return 


to BASIC. 


100 PRINT’ GOODBYE” 
1190END 


a loop which makes the computer 
repeat the program lines between 
the FOR and the NEXT a set 
number of times. In Amstrad 
BASIC it is not necessary for the 
NEXT to have the VARIABLE 


after it. 


10 FOR n=1 TO 30 
20 PRINT’’Loop “;n 
30 NEXT 


tells the computer to jump toa 
certain line number. Try not to use 
GOTO too much because it makes 
the program difficult to follow. 


IF... THEN 


INK 


INKEY{(n) 


When you learn how to use 
GOSUB you will find Corry, 
needed so much. iii 


13® MODE 1 
149 PRINT’ Again” 
150 PRINT“and again!” 
169 GOTO 159 


tells the computer to make g 
decision. If the answer is true 
(Yes) then the computer obeys the 
rest of the IF/THEN line. If the | 
answer is false (No — not true) the 
computer moves onto the next 
program line. Can be used with 
ELSE (See ELSE). 


10 INPUT“’Please type in a 
number ";number 

20 IF number=19 THEN 
PRINT’ HELLO” 


Depending on the Screen Mode, a 
number of INKs are available. The 
colour or colours used for an INK 
may be changed by an INK 
command, according to the table 
of colour values in Chapter 8. 


tests the keyboard to see if any 
keys have been pressed. The 
number in the brackets relates to 
a key. See page 16 Appendix III of 
your User Instructions. For 
example, INKEY(47) tests for the 
space bar. 


INKEYS 


INPUT 


49 MODE 1 

20 IF INKEY(47)=0 THEN 
SOUND 1,200,11,15 
ELSE GO TO 20 


waits for a key to be pressed on 
the keyboard. 


190 PRINT “Do you want to 
play again?” 

110 PRINT ‘Press Y or N” 

120 WHILE g$<>’‘Y’ AND 
g$< >‘N' ANDg$<>'y’ 
AND g$< >‘n’ 

130 g$=INKEYS 

149 WEND 

150 RUN 


stops the program and waits for 
something to be typed in. INPUT 
requires <ENTER > to be pressed 
before continuing. 


Messages can be included in 
INPUT lines. The number or 
letters typed in are stored ina 
STRING VARIABLE (e.g. ‘AS’) or 
NUMERIC VARIABLE (e.g. ‘age’) 
following the INPUT line ‘prompt’ 
message (if any). 


10 MODE 1 . 

20 INPUT’ How old are you ”, 
age 

39IFage>2 PRINT’’Coo! 
That’s old. | am not even 1 
year old.” ELSE PRINT 


LEN 


LIST 


LOAD 


“Iwas invented in 
984.” 
40 PRINT| wonder if | shall 
look like you when | 
am “Sage 


works out how many characters 
there are ina string ( 
letters are in a word 
memory) 


or how many 
stored in 


10 MODE 1 

29 INPUT “Type any word 
word$ 

30 length=LEN(word$) 

49 PRINT “That word was 
length; letters long.’’ 


prints the program in memory 
onto the screen. LIST 1990 will list 
line 100 only. LIST 100-200 will 
list lines 100 to 200. LIST 300- 
will list all lines after 300. It does 
not need a line number. To stop a 
program whizzing up the screen 
you can press the ESC key once. 
Press any key to continue listing. 
Press ESC key twice to stop 
listing. 


LIST 19000-1050 <ENTER> 


is used to load a program from 
cassette or floppy disc. LOAD“” 
will load the first program found; 
this will not work with a disc 
drive. LOAD“program name” 
loads the named program. This 
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LOCATE 
XY 


MODE 


MOVE 


90 


will work with cassette or disc 
drive. It does not need a line 


number. 


is used with PRINT and INPUT to 
move words to where you want 
them on the screen. The column 
number across the screen (x) 
comes first, followed by a comma 
and the number of lines down the 
screen (y). See Chapter 11 on using 
LOCATE. 


109 MODE @ 

20 PRINT “WHAT IS 
YOUR NAME?” 

30 INPUT NAME$ 

40 CLS 

5@ LOCATE 8,10 

60 PRINT NAMES 

70 LOCATE 20,20 

80 PRINT “WHAT A 
NICE NAME!” 


The Amstrad has 3 MODEs, 
numbered @ to 2 which select the 
type of screen display and 
number of colours available. See 
Chapters 8 and 12. 


29 MODE 2 


is used in the graphics MODEs to 
move to a point on the screen. It is 
followed by two numbers 

separated by a comma, giving the 


NEW 


PAPER 


PEN 


position across and down the 
screen. See Chapter 13. 


10 MODE 1 

20 MOVE 320,200:REM cent 
of screen ™ 

30 PLOTRQ,@ 


removes the old program frorp, th 
computer’s memory. . 


NEW <ENTER> 


sets the background ink for 
characters. When characters are 
written to the text screen, the 
character is filled with the PAPER 
ink before the character is 
written. 


10 MODE @ 

20 FOR P=0TO 15 

30 PAPER P: CLS 

49 PEN 15-P 

50 LOCATE 6,12: PRINT 
“PAPER” 

60 FOR t=1 TO 500: 
NEXT 

70 NEXT P 


sets the ink to be used when 
drawing at the given screen 
stream. 


10 MODE @ 
20 PEN 2 
30 PRINT “AMSTRAD” 


pyor 


pRINT 


REM 


RND 


‘s the same as DRAW except that 
i nly the pixel at the specified 
 o-ordinate is written. 


tells the computer to write 
something onto the screen. If two 
printed messages, or numbers, are 
separated by a semi colon (;) they 
will be printed next to each other. 


10 MODE 1 
20 PRINT “Hi there” 
30 PRINT “Hi there” 
40 PRINT “Hi”:” there” 


lets you place comments in the 
program. The computer ignores 
everything on a program line after 
it comes across the REM 
command, so you must not add 
commands that you want it to 
carry out on the same line after a 
REM. 


19 REM This is my program. 
20 GOTO 20 


selects a random number up to the 
limit set in the brackets. 
INT(RND(1)*10}+1 gives youa 
whole number between 1 and 10. 


19 WHILE number <2@ 

20 number=INT(RND(1) 
*20)+1 

30 PRINT number 

49 WEND 


RUN 


SAVE 


SOUND 


SPACES 


makes the com 
Program in the 
not need a line 


puter Carry out the 


memory. It does 
number, 


RUN <ENTERS 


Saves the Program in memory on 
Cassette or disc. You may give the 
Program a name of up to sixteen 
letters (only seven if you are 
Saving ontoa disc). The program 
name must have quote marks (“”) 


around it. It does not need a line 
number, 


SAVE“ Invaders 2” 
< ENTER > 


is used to make sounds. It is 
followed by four numbers. The 
first one is the sound channel, the 
second the volume (15 to 0), 15 

is the loudest. The third number is 
the pitch and the fourth is the 
length of the sound, or ‘duration’. 


19 SOUND1,15,INT(RND(1) 
*255)+1,5 


It prints a number of spaces on the 
screen. 


19 MODE 1 7 , 
20 PRINT” Hi”’;SPC(32);"there 
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this command allows text and 


TAG : 
symbols to be mixed W ith 
graphics. 

TAGOFF cancels the TAG for a given 
stream. 

WHILE/ _ is another way of making a loop. 

WEND The computer repeats certain 
program lines until a condition 1s 
true. 

1@ MODE 1 
20 WHILE number - 57 
30 number=! NT(RND(1)* 
10@)+1 
se Index 
CHAIN 27, 38 INK 
CLS 9,12,16-7,32,41- INKEY 
2, 44, 48-51, 63 INPUT 
CURSOR 
CONTROL 42, 45-6 LIST 
DELETE 7-9, 11,14 
43-4 LOAD 
ceil 75-79 LOCATE 

END 9, 30 

ESCAPE 15-6, 18, 36, 51 MODE 

FOR...NEXT 49, 51-2, 55, 

57-8, 72 MOVE 

GOTO 15-8, 51, 55, 71 NEW 

10 See 

THEN 59-64, 70 PAPER 
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49 PRINT number 

50 WEND 

60 PRINT “I have final 
selected number y 
‘number 


WINDOW sets a text window fora oi, 
screen stream. ven 
10 MODE 1 
20 WINDOW 10,30.8,29 
30 PAPER 2: PEN 3 
40 CLS 
50 PRINT “WINDOW ONE: 
69 GOTO 60 
49, 53 PEN 47-80, 53 
69-70, 78-9 PRINT ea 
28-31, 33, 52- 9-12, 15-9, 22, 
3, 59, 62, 64, 69 = = 39, 53, 
af 
9, 18, 25, 31, 35, RAM 19 
37, 39, 44, 46 REM 
34, 37-8, 80 ae - 
65-67, 69-71, RND sua 
74 RUN 148, 25, 28, 31-2, 
47-9, 54, 65-6, 38, 44, 49, 54- 
69, 72, 74-5, 5, 71, 73, 75 
; 7 ve SAVE 32, 34, 36-40, 
: 42, 45, 80 
SHIFT 7, 10-1, 4 
14, 18, 49, 51 SOUND 61,63 adie 
47-8, 50, 73 WHILE/WEND _ 56-38, 62, 64 


nder 3.1 , 
dbe that you have haven’t switched the 


i“ ch 
jgsum! Bae since typing in the commands: 


machine O 


and 


yous 
LET planes=3 

if you now type 
PRINT models 


the computer will give you the wrong answer! 
This is because it still thinks that 


models = cars + trains 
whereas your collection now includes cars, 
plus trains plus planes. So you also have to 


change the formula by typing in: 


LET models = cars + trains + planes 


imply type in the additional information: 


Now, when you type: 
PRINT models 


you should get the correct answer-— 18. 


Mindbender 3.2 
Easy, this one! Just type 


LET singles = 12 
LET albums =8 
LET records = singles + albums 


then, to check the answer, type 
PRINT records 


If you've used the same numbers as me, you 
should get the answer 20. But you could just as 


easily substitute your own numbers to geta 
different answer. 


Note that you could also use different 
names for the variables and still get the right 
answer. For example, you could call the 
seven-inch singles ‘sevens’ and the 
twelve-inch albums ‘twelves’, provided you 
use the same names for the formula line, e.g.: 
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LET sevens = 12 
LET twelves = 8 
LET records =sevens + twelves 


PRINT records 


u are really lazy (or hate typing), you 


If yo 
e variable names to a 


could even abbreviate th 
single letter, e.g. s for ‘sing 
and r for ‘records’. 


les’, a for ‘albums’, 


You can also leave out the word LET, 
which isn’t necessary on the Amstrad (though 
it is on some computers, including the Sinclair 
Spectrum). Your answer would then be: 


s=12 <ENTER> 
a=8 <ENTER> 
=sta <ENTER> 
PRINT r <ENTER> 


While this gives a perfectly correct answer 
with very little effort, I don’t recommend you 
to do it this way just yet as you can easily 
forget what the single letters stand for. Stick to 
full words that help to explain what you are 
doing. 


Mindbender 4.1 

There were a couple of red herrings in this one 
to trick you! The answer is to use numeric 
variables instead of string variables, because 
you can’t do calculations, with string 
variables. 


10 cars=5 
20 dolls =7 
3@ toys = dolls + cars 
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4@ PRINT “Total number of to ‘ 
toys _ 
50 END 


All you had to do was to delete the dollap ¢; 

($) and the quote marks round the os Slgng 
There is no need to use the word LET is 

it would not be wrong to do so. The fORe ge 
in line 40 is not strictly necessary, so eae! 
not wrong if you missed it out. aomere 


In line 30 it makes no difference ; 
e 
‘cars’ before ‘dolls’. if you put 


If you deleted line 20 and made line 1 
read 0 


19 cars = 5:dolls = 7 


you are a programming genius and can 
yourself 200 bonus points! ~~ 


Mindbender 7.1 

Just add these lines (You may need differ 
line numbers to those shown, dependin 
how you ended up after using RENUM) a 


20@ LET minutes = hours * 6@ 

210 PRINT “ora staggering ”: 
minutes; minutes,” 

229 LET seconds = minutes * 60 

230 PRINT “which works out ata 
mind-boggling ” 

240 PRINT; seconds;” seconds!!!” 


Don’t worry if the wording of your PRINT 
statements isn’t the same as ours — it’s the 


NCIPLE (how to do it) that matters! 
I 
pR 


Note that for anyone over 32 years old, 
umber of seconds is too big for the 
pe ® ad to handle, so it has to use 
AM ONENTIAL NOTATION! 
E 
. der 7.2 
Mind REM *** LIREX *** 
20 LET rate =2395:CLS 
25 PRINT:PRINT 
30 INPUT” How many pounds do you 
wish to change "';pounds 
4@ LET lire = pounds * rate:CLS 
45 PRINT:PRINT 
50 PRINT’’For “pounds; 
sterling, you will ” 
60 PRINT “receive approx. 
in Italy” 
70 PRINT ‘at the exchange rate of 4 
rate;”’ lire’ 
80 PRINT” per pound sterling.” 


pounds 


“lire; lire 


Mindbender 7.3 
For France, change the following lines in the 
above program to read: 


10 REM *** FRANCEX *** 

20 LET rate =11.9:CLS 

49 LET francs = pounds * rate:CLS 

60 PRINT“‘receive approx. "’;francs; 
“ francs in France” : 

70 PRINT’‘at the exchange rate of "; 
rate;’’ francs” 


You can NOw see how much ea 
Programs, rather th 


lines when only mi 


sier it is to EDIT 
an having to re-type whole 
nor changes are needed! 


Mindbender 8.1 

The lines in MODE 2 on] 
because the other INK c 
same colour as the PEN 
Therefore only the yellow line can be seen. 


This is also the reason why all the even pen 
numbers are missed out. 


y printed in yellow 
olour (blue) is the 
(background). 


Mindbender 8.2 
10 MODE @ 
20 PRINT “AMSTRAD CPC 464” 
30 AMSTRAD = AMSTRAD +1 
40 PEN AMSTRAD 
50 LOCATE 1,20: PRINT AMSTRAD: 
LOCATE 1, AMSTRAD 
69 FORN=1TO 500: NEXT 
70 IF AMSTRAD <15 GOTO 20 


Mindbender 9.1 
19 MODE 1 
20 FOR a=1 TO 15 
30 PRINT‘Hello, Jim” 
40 NEXTa 


Mindbender 9.2 
19 REM *** Shooting stars *** 
20 MODE 1 
39 column=2 
49 WHILE column < 39 
59 LOCATE column,12: PRINT’*” 
69 LOCATE column-1,12: PRINT “ ” 
79 column = column + 1 
80 WEND 


95 


Mindbender 9.3 


Add the follow ing above program. 


lines to the 


35 START = TIME 
90 PRINT Time= 
300 seconds 


(TIME-start)/ 


When you RUN the program and compare the 
rIME with that of the FOR/NEXT loop, you 
may find the difference surprising. 

‘ou can't draw absolute 

n only one test. There are 
of loop will be the 


However, ¥ 
conclusions {ror 
times when one type 


obvious choice. 


Mindbender 9.4 
1@ MODE 1 
20 PRINT ‘The twelve times table” 
30 FOR n=1 TO 12 
40 PRINT nn; x12= on iz 
50 NEXT n 


Mindbender 9.5 
10 MODE 2 
20 FOR n=1 TO 200 
30 PRINT ‘Fred “: 
40 NEXT n 


Mindbender 9.6 
10 MODE 1 
29 START =TIME 
30 FOR n=1 TO 1000 


96 


40 PRINT nn 
50 NEXT n 
60 PRINT “TIME= ” 
if = AT 
300; seconds” TE START), 

Mindbender 16.1 
er new ‘Score so far’ line should I 

etween existing lines 110 and 1: 0 iNSerteg 
115. It has to appear after ‘right= - ~ Say, Li 
been worked out, e.g. —Tight+1’ has 


115 PRINT “score = "; right: 
out of “’; goes eh 


To stop the ‘Press an 
y key’ 
you need something like. nee nege appearing 


112 IF goes= 19 THEN GOTO 15 
0 


You could place it after lin 

ae 117 — but this sae cy y at line 

ie ale On the Amstrad, you nee 
ps before you ‘jump out’ viele 

strictly speaking, the line shoul of them. So, 

140, rather than GOTO 159 ane OID 


A 
ee gra go between lines 130 and 
eae seg after you have re re 7 
nina e€ screen and pressed eed 
ate that you want the next arene i 
8g, 


135 CLS 


V4 
© Hi 


ISBN O-5?2-01297-7 & 


(8037 2"0129/7 


_ AMSTRAD MAGIC Your First rogramming Book Ko 


